60450100 




CONTRpL DATA 
COLORATION 



NOS VERSION 1 
MODIFY 
REFERENCE MANUAL 



CDC® COMPUTER SYSTEMS: 
CYBER 170 

MODELS 171, 172, 173, 174, 175 
CYBER 70 

MODELS 71, 72, 73, 74 
6000 SERIES 



ALPHABETIZED DIRECTIVES INDEX 



Name 



Parameters 



Page Number 



*BKSP 
*BKSP 
*CALL 
*CALLALL 

-COMMENT 

*COPY 

*COPYPL 

*CREATE 

*CWEOR 

'-DECK 

* DEFINE 
* DELETE 
*D 

*DELETE 
*D 

*ED1T 
-ELSE 
*ENDIF 
*IDENT 
*IF 
*IFCALL 

* IGNORE 
-INSERT 
*I 
'MNWIDTH 

* MODNAME 

*MOVE 

'-NIFCALL 

*NOSEQ 

*OPLFILE 

'-PREFIX 

*PREFIXC 

*PURDECK 

:-PURDECK 

'-READ 

*READ 

*READ 

*READPL 

*READPL 

-RESTORE 

'-RESTORE 

-RETURN 

'-REWIND 

*SEQ 

-SKIP 

-SKIP 

-SKIPR 

* UN YANK 

*UNYANK 

* UP DATE 

*WEOF 

*WEOR 

'-WIDTH 

*YANK 

*YANK 

-/ 



file 
file, n 
deckname 
string 
comment 
file, deckname 
file, deckname 
file 

deckname 
name, value 
c 
c 

c l' c 2 

c l ,c 2 
p.,p„,...,p„ 



mod name 

atr, name, value 

name, deckname 

dname 

c 

c 

n 

modname 



dname r , dnamej, dname,, dname„, 
name, deckname 



, , dname 



file ., file 2> 
x 



. file 



, file 
, file r 



dname 1 , dname. , 

dname . dname, 
„., a b 

file 

file, deckname 

file, '■■■ 

dname 

dname, c. , c„ 

c 

c l* c 2 

file,, file , . , 

file |, file:;,.. 

file 

file, name 

file, rname 

modname 

modname, * 



n 

modname 
modname, : 
comment 



, dname 



5-2 

5-2 

6-1 

6-2 

6-2 

3-3 

3-2 

3-2 

6-3 

4-2 

7-1 

4-2 

4-2 

4-2 

4-2 

4-4 

6-2 

6-2 

4-1 

6-2 

6-1 

4-3 

4-3 

4-3 

7-1 

4-2 

7-2 

6-1 

3-3,6-3 

3-2 

7-1 

7-1 

4-3 

4-3 

5-1 

5-1 

5-1 

5-1 

5-1 

4-2 

4-2 

5-2 

5-2 

6-3 

5-2 

5-2 

5-2 

4-3 

4-3 

7-2 

6-3 

6-3 

3-3.6-2 

4-3 

4-3 

7-1 



I 



60450100 




CONTRPL DATA 
CORPORATION 



NOS VERSION 1 
MODIFY 
REFERENCE MANUAL 



CDC® COMPUTER SYSTEMS: 
CYBER 170 

MODELS 171, 172, 173, 174, 175 
CYBER 70 

MODELS 71, 72, 73, 74 
6000 SERIES 



REVISION RECORD 


REVISION 


DESCRIPTION 


A 


Manual released. 


(3-8-76) 




B ' 


Revised to update the manual to NOS 1. 2 at PSR level 439, and to make typographical and 


(12-3-76) 


technical corrections. New directives IF, ELSE, ENDIF, and NIFCALL are added. The 




previous DEFINE directive has a new parameter added that allows a value to be associated 




with a defined name. This edition obsoletesthe previous edition. 


C 


Revised to update the manual to NOS 1. 2 at PSR level 452, to reformat error messages, and to 


(7-15-77) 


make typographical and technical corrections. Support of CDC CYBER f70 Series, Model 171 is 




also included. 


D 


Revised to update the manual to NOS 1.3; to add new information regarding common decks; to add 


(2-3-78) 


examples of the IF, ELSE, ENDIF, and NIFCALL directives; to change the type font of the terminal 




sessions; and to make typographical and technical corrections. This edition obsoletes all previous 




editions. 


































































































Publication No. 
60450100 





REVISION LETTERS I, 0, AND X ARE NOT USED 



© 1976, 1977, 1978 

by Control Data Corporation 

Printed in the United States of America 



Address comments concerning this 
manual to: 

Control Data Corporation 
Publications and Graphics Division 
4201 North Lexington Avenue 
St. Paul, Minnesota 55112 

or use Comment Sheet in the back of 
this manual. 



LIST OF EFFECTIVE PAGES 



New features, as well as changes, deletions, and additions to information in this manual, are indicated by bars in the margins or by a dot 
near the page number if the entire page is affected. A bar by the page number indicates pagination rather than content has changed. 



PAGE 


REV 


Front Cover 


- 


Inside Front 




Cover 


- 


Title Page 


- 


ii 


D 


iii/iv 


D 


v/vi 


D 


vii 


B 


viii 


C 


1-1 


B 


1-2 


B 


1-3 


C 


1-4 


D 


2-1 


C 


3-1 


D 


3-2 


D 


3-3 


B 


3-4 


D 


3-5 


D 


3-6 


C 


4-1 


A 


4-2 


B 


4-3 


A 


4-4 


D 


4-5 


D 


4-6 


D 


5-1 


B 


5-2 


B 


5-3 


D 


5-4 


D 


6-1 


C 


6-2 


B 


6-3 


B 


6-4 


D 


6-5 


D 


6-6 


D 


7-1 


B 


7-2 


D 


7-3 


D 


7-4 


D 


8-1 


C 


8-2 


D 


8-3 


A 


9-1 


B 


9-2 


A 


9-3 


B 


9-4 


B 


10-1 


D 


10-2 


A 


10-3 


B 


10-4 


A 


10-5 


A 


10-6 


A 


10-7 


A 


10-8 


B 


10-9 


A 


10-10 


D 


10-11 


A 


A-l 


A 



PAGE 



B-l 

B-2 

B-3 

B-4 

B-5 

C-l 

C-2 

C-3 

C-4 

Index- 1 

Index-2 

Index-3 

Comment 

Sheet 
Inside Back 

Cover 
Back Cover 



REV 



C 

c 

D 
D 
C 
A 
C 
D 
D 
B 
C 
B 



PAGE 



REV 



PAGE 



REV 



PAGE 



REV 



60450100 D 



iii/iv 



PREFACE 



INTRODUCTION 

This manual describes the program library mainte- 
nance utility Modify. Modify is part of the Network 
Operating System (NOS) for CONTROL DATA® 
CYBER 170 Series, Models 171, 172, 173, 174, 
and 175 Computer Systems; CDC®CYBER 70 Series, 
Models 71, 72, 73, and 74 Computer Systems; and 
CDC® CYBER 6000 Series Computer Systems. 
Modify is used to maintain and update source files 
that are on libraries in a compressed and symbolic 
format. 

The introduction describes features of Modify and 
presents an overview of its operation. The remain- 
ing sections describe the directives that the user 
supplies to control library creation and editing. 
Because the advantages of Modify are best utilized 
by a programmer with a large volume of source 
program text or symbolic data, the manual is writ- 
ten for the experienced NOS applications or systems 
programmer. Wherever possible, Modify usage is 
illustrated through examples. 

Appendix C describes the NOS utility OPLEDIT, 
which provides the capability to delete and recon- 
struct previous modification sets. 



RELATED PUBLICATIONS 



Control Data Publication 

NOS Version 1 Modify Instant 

NOS Version 1 Reference 
Manual, Volume 1 

NOS Version 1 Applications 
Programmer's Instant 

Network Products Interactive 
Facility Version 1 Reference 
Manual 



Network Products Network 
Terminal User's Instant 

NOS Version 1 Time-Sharing 
User's Reference Manual 

NOS Version 1 Terminal 
User's Instant 



Publication Number 
60450200 

60435400 

60436000 

60455250 
60455270 
60435500 
60435800 



DISCLAIMER 

This product is intended for use only as described 
in this document. Control Data cannot be respon- 
sible for the proper functioning of undescribed 
features or undefined parameters. 



For further information concerning Modify and NOS, 
consult the following manuals. 
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INTRODUCTION 



Modify is used by the programmer to maintain text 
(large programs or data files) in a compressed form 
allowing him to easily change individual lines within 
the text. Modify transforms text into a specially 
formatted file whose structure enables Modify to 
make requested changes (or rescind previously 
made changes) efficiently. Such a file, a program 
library file, is in program library or Modify for- 
mat. Once this file has been established, the user 
need only specify to Modify the changes he is making 
to the text. Modify then performs the requested 
changes and produces several files of different types 
which reflect the changes. One of these files is the 
compile file, a text file acceptable to language 
processors (for example, FORTRAN, BASIC, or 
COMPASS). This file can also be directed to an 
output device for listing or punching. 



MODIFY ORGANIZATION 

Modify can be organized into three main functional 
elements: 

• Files used to initialize the program library - 
these contain the program text from which 
Modify establishes the program library, the 
body of text upon which modification direc - 
tivesactto effect user-requested changes 

to the text. 

• Directives —these are user -specified in- 
structions to Modify which establish the 
program library, produce changes in the 
text, perform various utility functions upon 
files used by Modify, and/or alter certain 
operational characteristics of Modify. 

• Output files —these are produced by Modify 
after it performs the instructions specified 
by directives. Three of these files are up- 
dated versions (in different formats) of the 
original text; the fourth is a report of 
actions taken during Modify' s execution. 

Refer to figure 1-1 during the following discussion 
of the elements of Modify organization. 



FILES USED TO INITIALIZE 
PROGRAM LIBRARY 



These files contain program text in one of two forms: 
source format or program library format. Files 
used to initialize the program library may contain 
several program and /or subroutine decks, kept as 
separate logical records on the file. The user can 
designate a deck containing frequently used lines 
(such as a group of FORTRAN COMMON statements) 
as a common deck. The user can then direct Modify 



to insert the text of a common deck within the pro- 
gram text wherever a CALL directive appears with- 
in the program text (refer to section 6 for further 
information on the CALL directive). 

Source -format files are coded text files, typically 
prepared either as a card deck or through the text- 
file creation facilities of the NOS time -sharing 
subsystem (refer to the NOS Time-Sharing User's 
Reference Manual). All program library files begin 
as source -format files, which Modify processes to 
create program library files. 

A file in program library format is defined as fol- 
lows. 

• It is compressed (Modify has replaced 
three or more consecutive blanks within a 
line with special codes). 

• Each line of text has been assigned, by 
Modify, a sequence number and name, 
thereby allowing the user to refer to individ- 
ual lines when he wishes to change the 
text on subsequent Modify runs. 

• It contains a directory, built by Modify, 
which serves as an index of the decks on 
the program library file. 



DIRECTIVES 

The user can control Modify execution by specifying 
directives to Modify. These directives (compile 
file directives excepted) form a logical record on a 
file which the user specifies on the Modify control 
statement. If Modify is being executed from a time- 
sharing terminal. Modify prompts the user for di- 
rectives, unless he has specified otherwise on the 
Modify control statement. 

The user may direct Modify to begin reading direc- 
tives from an alternate file and position this file 
(or other files local to his job) with file manipulation 
directives. Certain files (refer to section 5) cannot 
be operated on by these directives. 

Initialization directives declare which files Modify 
is to use to initialize the program library. They 
indicate whether the file is in source format (thereby 
causing Modify to make a copy of it in program li- 
brary format) or is in program library format. 

Directives which cause text to be changed fall into 
two groups: modification directives and compile 
file directives. 

Modification directives specify line-by-line altera- 
tions (insertion; deletion or deactivation; and reacti- 
vation) for Modify to make. They also specify 
which decks Modify should copy to its output files 
with the specified modifications included. 
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Figure 1-1. Simplified Modify Organization 



Compile file directives are part of the text on the 
program library; thus, compile file directives were 
either on a file used to initialize the program library, 
or were inserted by modification directives. An 
example of a compile file directive is the CALL- 
directive. 

Modify includes many other directives providing 
extended features. These primarily affect the op- 
erating characteristics of Modify which are described 
in section 7. 



OUTPUT FILES 

Modify produces several files as output, all of which 
are optional. The user specifies these files through 
options on the Modify control statement. 



The compile file is a text file with user -specified 
modifications incorporated into it. It may be used as 
input to a language processor, directed to an output 
device such as a printer or card punch, or used as 
data for an applications program. 

The new program library file contains the same up- 
dated text as the compile file, only in program li- 
brary format. Thus, Modify can process this file 
directly on subsequent Modify runs. 

Modify produces a list of text incorporated into the 
program library, details the status of the program 
library and the other files output by Modify, and 
notes errors and other significant events occurring 
during Modify execution. 

The source -text output file contains updated text 
similar to that of the compile file. However, 



1-2 



60450100 B 



compile file directives on the program library have 
not been removed or acted upon by Modify. 



MODIFY EXECUTION 

Modify begins execution as a result of the operating 
system interpreting a Modify control statement. 
Modify execution then progresses in three phases: 

• Initialize program library 

• Read modification directives 

• Incorporate changes /write output files 



INITIALIZE PROGRAM LIBRARY 

During this phase, Modify reads initialization di- 
rectives (which must precede modification direc- 
tives) from the directives file to prepare the program 
library. The first file to be included in the program li- 
brary is the file declared on the Modify control 
statement (P parameter); refer to section 8. Other 
files declared by initialization directives are logi- 
cally merged with this file to form the program 
library. If the initialization directive specifies 
that a file is in source -text format, Modify converts 
it to a file in program library format before merging 
it with the program library. 

The initialization phase ends when Modify encounters 
the first modification directive. File manipulation 
directives do not terminate the initialization phase. 



READ MODIFICATION DIRECTIVES 



During the second phase, Modify reads the remaining 
directives on the directives file and stores any new 
text for insertion during the final phase. The time- 
sharing user is prompted for directives by Modify 
at his terminal. In batch usage, the file containing 
the directives is specified on the Modify control 
statement. This defaults to the job input file. An 
alternate directives file may be specified by the ap- 
propriate file manipulation directive (refer to 
section 5). 



INCORPORATE CHANGES/WRITE 
OUTPUT FILES 



During the final phase, Modify performs the re- 
quested changes on a deck -by -deck basis, incorpor- 
ating them into the output files requested by the 
Modify control statement. Each inserted' line is 
assigned a modification name, specified by a modi- 
fication directive (refer to section 4), and a se- 
quence number generated by Modify. These are 
used in later Modify runs to make further changes 
to the text. All lines having the same modification 
name comprise a modification set. 



This phase can be initiated either by Modify inter- 
preting an EDIT directive (refer to section 4) on 
the directive file, or by the presence of a Modify 
control statement option specifying that this phase 
should be initiated by Modify after it exhausts the 
directive file (refer to section 8). 



FEATURES 

Features of Modify include: 



Formatting of text files to facilitate line- 
by-line modification. 

Insertion, deletion, and restoration of 
previously deleted lines according to line 
sequence numbers. 

Facilities for rescinding one or more 
groups of changes (modification sets) pre- 
viously applied to text, thereby preserving 
original appearance of text. 

Replacement of often-used groups of lines 
by one -line calls for their insertion. 

Facilities for limiting range of modifications 
to specified decks. 

Generation of a file in text format suitable 
for input to processors such as compilers 
and assemblers. 

Execution from either batch -origin or time- 
sharing jobs. 

Processing of directives from an alternate 
file. 

Comprehensive statistical output noting any 
changes effected during the run and pre- 
senting the status of the program library. 

Support of both 63- and 64-character sets. 



MODIFY EXAMPLES 

Examples in this manual are for illustrative purposes 
only. These examples are neither the most efficient 
nor necessarily recommended methods of using the 
Modify directives. 

Figure 1-2 details a job submitted to local or remote 
batch and figure 1-3 illustrates the same job entered 
from a time -sharing terminal. The user need not 
be concerned with the meaning of directives or of 
parameters on the Modify control statement at this 
point. Instead, he should compare the structure of 
the two jobs. 

Subsequent examples in this manual (with the excep- 
tion of section 3 and section 10, Batch Job Examples) 
depict only jobs entered from a time -sharing 
terminal. 

The examples pertaining to a group of directives 
immediately follow the discussion of those direc- 
tives. Some of the files created and modified in 
an example have been retained and used in the 
succeeding example. 
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JOBMOD. 

USER (USERNUM,PASSWRD, FAMILY) 

CHARGE (CHARNUM,PROJNUM) 

GET(MAINP) 

COPYSBF(MAINP) 

MODIFY(P=0,F,N) 

SAVE(NPL=MAINPL) 

— EOR — 

*REWIND MAINP) 

*CREATE MAINPJ 

— EOI — -« 



-Input directives for Modify statement. 

|End-of-information is 6/7/8/9 multiple punch 
"[in column 1. 



Figure 1-2. Modify Execution from Batch 



batch -« 

$RFL,0. 

/old ,mainp 

/lnh,r 

DECK1 

*** MAIN PROGRAM 

PROGRAM MAIN (OUTPUT) 

PRINT*, "EEGIN MAIN PROGRAM." 

CALL SUB! 

PRINT*, "END MAIN PROGRAM." 

STOP 

END 
--SOR- 
OS CK3 

*** EMPTY DECK 
— EOR— 

/modify,p=0,f,n,l=0 
? *create mainp -« — 

9 

MODIFICATION COMPLETE . 
/replace , npl=mainpl 



-After logging in, user requests batch subsystem. 



JUser specifies 1=0 indicating that he does not wish 
~{to receive Modify output. 

I Input directives are requested and entered 
immediately following Modify statement. Null 
input line (carriage return only) terminates 
input. 

j Program notifies user that it has completed 
1 modification. 



Figure 1-3. Modify Execution from Time-Sharing Terminal 



ASCII MODE CONSIDERATIONS 

Several problems may arise when using Modify from 
a time -sharing job while the terminal is in full ASCII 
character set mode. Refer to appendix A of the NOS 
Reference Manual, volume 1, for a description of 
ASCII character sets. 

Directives entered interactively from the terminal, 
or those in an alternate directive input file, must 
not contain ASCII characters with escape codes; 
that is, directives must be entered in all uppercase 
characters. Modify does not recognize lowercase 
directives that contain escape codes. 



When creating a program library, several precau- 
tions should be taken. While a source file can con- 
tain full ASCII characters, all deck names and 
compile file directives must be in full uppercase (no 
escape codes). Care should also be taken when 
entering source lines in full ASCII mode. Since each 
character may actually occupy 12 bits (escape code 
and character), what appears to be a line width of 
75 characters, for example, may actually be 150 
characters. Modify does not allow line widths 
greater than 100 6-bit characters. 
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DIRECTIVE FORMAT 



Directives allow the user to create libraries and 
extensively control and direct the correction and 
modification process. File initialization directives 
identify old program libraries and source decks to 
be placed on the new program library. Modification 
directives identify the text to be inserted, set pa- 
rameters of the modification process, and inform 
Modify of insertions, deletions, and other correc- 
tions. File manipulation directives allow user 
control of the input files. Compile file directives 
can be in source decks originally or can be inserted 
during a Modify run. These directives are manipu- 
lated much like source lines during the creation, 
updating, and correction phases but are recognized 
when the compile file is written. 

A directive has the following format. 

*dirname p.. , p„, . . . , p 



* The prefix character is in 

column 1. It is initially de- 
fined by Modify as an asterisk, 
but may be changed with 
PREFIX and PREFIXC direc- 
tives. In this manual, the 
asterisk is used as the prefix 
character. 

dirname The directive name starts in 
column 2. It is terminated by 
one or more blanks or a sepa- 
rator (for example, a comma). 

p. Optional directive parameters. 

Numeric parameters are deci- 
mal. 

The directive name and parameters are separated 
by any character that has a display code value of 
55s or greater; that is (assuming 64-character set), 
a character other than: 



Some directives require specific separators. No 
embedded blanks are permitted within a parameter. 
However, any number of blanks can be between the 
directive name and the first parameter or between 
two parameters, provided the entire directive does 
not exceed 72 columns. 



LINE IDENTIFICATION 

The modification directives DELETE, INSERT, and 
RESTORE, and the file manipulation READPL direc- 
tive require line identifiers. These identifiers can 
be in either the complete or abbreviated form. 

The complete format of a line identifier is: 

modname. number 

modname. 1- to 7 -character name of a 

modification set or deck. A 
period terminates the modifi- 
cation name. 

number Decimal ordinal (1 to 262143) 

of the line within the correc- 
tion set or deck. Any char- 
acter other than through 9 
terminates the sequence 
number. 

The abbreviated form of a line identifier is: 
number 



When only the number is used for line identification 
(modification name is omitted). Modify uses the name 
from the MODNAME directive or the most recent 
DECK directive. 



A through Z through 9 + 



/ () 
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INITIALIZATION DIRECTIVES 



Modify initialization directives are placed on the 
directive file and precede all directives other than 
file manipulation directives. They are: 

CREATE Converts source decks to 

program library format for 
modification. 

OPLFILE Declares additional program 

library files as input. 

COPY Copies one or more records 

from named file to old program 
library. 

COPYPL Copies one or more records 

from named file to an internal 
scratch file which is logically 
merged with program library. 

WIDTH Defines the number of columns 

preceding the sequencing in- 
formation on the compile and 
source files; can occur any- 
where in directives file. 

NOSEQ Specifies no sequence infor- 

mation on compile file. 



CREATE, OPLFILE, COPY, and COPYPL are il- 
legal after the first use of modification directives. 
WIDTH and NOSEQ can be processed as compile 
file directives. 



PREPARING THE SOURCE FILE 

Before Modify can create a program library, the 
user must prepare the source file by assigning a 
deck name to each record of the source file and by 
identifying those decks that are to be common decks. 
The deck name must be the first line of the source 
deck. A 1- to 7 -character deck name begins in 
column 1. Legal characters are: 



A through Z through 9 



/ ( ) $ = 



If a second deck of the same name is introduced 
during initialization, the second deck takes prece- 
dence. In directory list output, the name of a re- 
placed deck is enclosed in parentheses. 

The second line of the source deck can identify the 
deck as common. To do so, it must contain the 
word COMMON in columns 1 through 6. An end-of- 
record terminates the deck. A set of decks is ter- 
minated by an end -of -file (6/7/9 multiple punch in 
column 1 for batch origin jobs) or end -of -information. 

Figure 3-1 illustrates a typical Modify source deck. 

Usually a deckname (optionally followed by a 
COMMON) precedes each program or subprogram. 
However, more than one subprogram may be in- 
cluded in a deck as is indicated in figure 3-2. A 
user might group two programs if modification of 
one requires reassembly or recompilation of both 
programs. 

Because of the order in which decks are edited I 

(refer to EDIT directive), it is recommended that I 

common decks be the first decks on the program I 

library. I 



DECK1 <- 

COMMON <- 



COMMON/A /A 

COMMON/Z/Z 
-EOR- < 



DECK2 < 

PROGRAM X 
*CALL DECK2 



END 



• Name of deck 
Declares deck as common 

Source deck 

End -of -record terminates deck 
■ Name of deck 

Source deck 



-EOI- <- 



End -of -information terminates final deck 



Figure 3-1. Modify Source Deck 
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FDATA 




COMMON 




DATA 





DATA 





DATA 





-EOR- 





FIRST 



IDENT 



END 
IDENT 



END 



First deck 



FIRST 



SECOND 



Program one 



Program two 



-EOI- 



Second deck 



Figure 3-2. Deck with Several Programs 



CREATE - CREATE PROGRAM LIBRARY 



When Modify encounters this directive, it writes 
the contents of the named file from its current 
position until it encounters an end -of -file onto a 
scratch file in program library format with a di- 
rectory. CREATE provides a means of initially 
creating a program library for subsequent modifi- 
cation, for adding decks to the program library, or 
for replacing decks on the program library, f 



Format : 



Format : 



:<CREATE file 

file Name of file containing one or more 
source decks. A format error oc- 
curs if the name of the file is 
omitted from the directive. This 
file must be local to the user's job. 



OPLFILE - DECLARE ADDITIONAL 
OPL FILES 



^OPLFILE fde 1 , file 2 , .... file 

file. Names of one or more files in pro- 
gram library format to be merged 
logically with the existing program 
library. 



COPYPL - COPY PROGRAM 
LIBRARY TO SCRATCH 



The COPYPL directive copies records (decks) al- 
ready in program library format to an internal 
scratch file which Modify logically merges with any 
existing program library. | Modify builds a di- 
rectory for this file as it is copied, ignoring any 
existing directory on the file from which the copy is 
made. All or part of the file can be copied. The 
file may reside on either mass storage or magnetic 
tape. Modify ignores all records on the file which 
are not in program library format. 

Format: 



The OPLFILE directive specifies additional files, 
already in program library format, that Modify log- 
ically merges with any existing program library. 
The existing library is made up of the old program 
library declared on the Modify control statement 
(P parameter) and/or other program library files 
established internally by CREATE or COPYPL. t 

The total number of files declared by OPLFILE 
| directives cannot exceed 50 files. Additional files 
are ignored with the message: 

TOO MANY OPL FILES. 



-COPYPL file, deckname 

file Name of file containing decks 

in program library format, 
with or without directory, and 
with or without other records in 
nonprogram library format. 

deckname Optional; name of last deck 

(record) to be copied. If deck- 
name is omitted from directive, 
or is not found on file, Modify 
copies all decks from the file 
starting at the current file 
position. 



t If the resulting program library contains two or more decks having the same name, the last one introduced 
to Modify takes precedence; that is, the previous deck is logically replaced. 
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COPY - COPY PROGRAM 
LIBRARY TO OPL 

The COPY directive performs the same functions 
as the COPY PL directive, with the following differ- 
ences: 

• The records (decks) are copied to the old 
program library file declared on Modify 
control statement (P parameter). If P=0 
is specified on the Modify control state- 
ment, the use of the COPY directive is 
not allowed. 

• Modify performs an EVICT on the old pro- 
gram library file before the copy takes 
place. Hence, this file (if it already exists) 
should not contain any useful information. 
See the NOS Reference Manual, volume 1, 
for a description of EVICT. 

• COPY can be preceded only by file manip- 
ulation directives. 

• Only one COPY directive is allowed for 
each Modify execution. 

COPY is useful when copying all or part of a pro- 
gram library residing on magnetic tape to a mass 
storage device, since the resulting program library 
file may be saved as a permanent file without having 
Modify create a new program library. See the NOS 
Reference Manual, volume 1, for a description of 
permanent file control statements. 

Format: 

*COPY file, deckname 

file Name of file containing decks in 

program library format, with 
or without directory, and with 
or without other records in 
nonprogram library format., 

deckname Optional; name of last deck 

(record) to be copied. If deck- 
name is omitted from directive, 
or is not found on file. Modify 
copies all decks from the file, 
starting at the current file 
position. 



WIDTH - SET LINE WIDTH ON 
COMPILE FILE 

The WIDTH directive allows the user to set the 
width of lines prior to the modify program library 
and write compile phase. The last (or only) WIDTH 
directive encountered on the directives file is used 
during the compile phase until a compile file WIDTH 
is encountered. If text is being inserted, the WIDTH 
directive is left in the text stream and is later proc- 
essed as a compile file directive. WIDTH can occur 
anywhere in the directive file. 

Format: 



*WIDTH n 



Number of columns preceding se- 
quence information on compile file 
and source file. Modify allows a 
maximum of 100 columns. During 

initialization of Modify, width is 
preset to 72. 



NOSEQ - NO SEQUENCE INFORMATION 



The NOSEQ directive allows the user to set the no 
sequence flag prior to the write compile phase. 
When no sequencing is requested, Modify does not 
include sequence information on the compile file. 
A SEQ directive encountered during the write com- 
pile phase clears the no sequence flag. If text is 
being inserted, the NOSEQ directive is inserted into 
the text stream and processed as a compile file 
directive. 

FORMAT: 
-NOSEQ 



INITIALIZATION DIRECTIVES EXAMPLES 

Figures 3-3 and 3-4 illustrate the creation of pro- 
gram libraries and the use of several initialization 
directives. Figure 3-3 is a detailed terminal ses- 
sion; figure 3-4 represents the same job formatted 
for batch input. The user can submit the batch or- 
igin job to obtain and examine output produced by 
Modify and FORTRAN 
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batch 

$RFL,0. 

/old,mainp 

/lnh,r 

DSCK1 

*** MAIN PROGRAM 

PROGRAM MAIN (OUTPUT) 

PRINT*, "EEGIN MAIN PROGRAM." 

CALL SUB1 

PRINT*, "END MAIN PROGRAM." 

STOP 

END 
— EOR-- 
DECK3 

*** EMPTY DECK 
--EOR-- 

/modify ,p=0 ,1=0, f,n=mainpl ,e=0 
? *create mainp 



MODIFICATION COMPLETE . 
/ ca talog , mainpl , r 

CATALOG OF MAINPL 
REC NAME TYPE 



FILE 
LENGTH 



1 
CKSUM 



Listing of source file, showing end-of-record 
marks, to be used to create program library. 
Notice required deck names. 



Modify statement to create program library 
with name MAINPL. MAINPL is the result 
of converting the source text file MAINP to 
program library format. 



DATE 



1 DECK1 OPL (64) 

2 DECK3 OPL (64) 

3 OPL OPLD 



* EOF * 



SUM = 



30 
4 
5 

41 



1 



CATALOG COMPLETE. 
| /replace, mainpl =mainpl 
/get, sub 1 
/copycf ,sub1 
DECK2 
*** SUBROUTINE 1 

SUBROUTINE SUB1 
PRINT*, "ENTER SUBROUTINE 1." 
CALL SUB2 

PRINT*, "EXIT SUBROUTINE 1." 
RETURN 
END 
END OF INFORMATION ENCOUNTERED, 
/rewind, sub 1 
$RE WIND, SUB 1. 

/modify, p=0, 1=0, f,n=altpl1,c=0 ■ 
? *create subl 

MODIFICATION COMPLETE . 
/ca talog, altpll ,r 

CATALOG OF ALTPL1 



4476 77/10/07- 
1725 77/10/07. 
1310 77/10/07- 



FILE 



The catalog utility is a convenient means of 
determining the decks and their types that 
were written on the program library. Refer 
to the NOS Reference Manual, volume 1, for 
information on the CATALOG control state- 
ment. 



Another source deck that the user wishes to 
maintain on a separate program library. 



Modify statement to create program library 
ALTPLl. 



REC NAME 



TYPE 



LENGTH 



CKSUM 



DATE 



1 


DECK2 


OPL (64) 


30 


5013 


77/10/07. 


2 


OPL 


OPLD 


3 


2117 


77/10/07. 



EOF 



SUM = 



33 



CATALOG COMPLETE. 

/get,altpl2 < 

/catalog , altpL? ,r 

CATALOG OF ALTPL2 
REC NAME TYPE 



FILE 
LENGTH 



User obtains alternate program library that 
he had created at an earlier session. 



1 
CKSUM 



DATE 



1 DECK3 

2 OPL 



OPL (64) 
OPLD 



25 
3 



0100 
2517 



77/10/06. 
77/10/06. 



1 



EOF 



SUM 



30 



CATALOG COMPLETE. 



Figure 3-3. Initialization Directive Examples (Sheet 1 of 2) 
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/rename , opl=mainpl 
$EENAME,OPL=MAINPL. 
/modify , f , 1=0 , n=mainpl 
? *oplfile altpll 
? *copypl altpl2,deck3 



MODIFICATION COMPLETE, 
/catalog ,mainpl , r 

CATALOG OF MAINPL 
REC NAME TYPE 

1 DECK1 OPL (64) 

2 DECK3 OPL (64) 

3 DECK OPL (64) 

4 OPL OPLD 




FILE 
LENGTH 

30 

25 

30 

7 



1 
CKSUM 



DATE 



Program library MAINPL is renamed OPL. 
In this manner, the P parameter is not needed 
on the Modify statement. 

Modify run to merge OPL with program library 
ALTPL1 and then use ALTPL2 to replace deck 
DECK3 on OPL. The compile output of MAINPL 
is written on the default file COMPILE. 



4476 77/10/07. 

0100 77/10/06. 

5013 77/10/07. 

5011 77/10/07. 



EOF 



SUM 



114 



1 

CATALOG COMPLETE, 
/replace .mainpl 
/copycf , compile 
*** MAIN PROGRAM 

PROGRAM MAIN(OUTPUT) 
PRINT*, "BEGIN MAIN PROGRAM." 
CALL SUB1 

PRINT* , "END MAIN PROGRAM . " 
STOP 
END 
*** SUBROUTINE 2 

SUBROUTINE SUB2 
PRINT*, "ENTER SUBROUTINE 2." 
PRINT*, "EXIT SUBROUTINE 2." 
RETURN 
END 
*** SUBROUTINE 1 

SUBROUTINE SUB1 
PRINT*, "ENTER SUBROUTINE 1." 
CALL SUB2 

PRINT*, "EXIT SUBROUTINE 1." 
RETURN 
END 
END OF INFORMATION ENCOUNTERED, 
/rewind , compile 
$RE WIND, COMPILE. 

/ftn,i=cotnpile,l=0 -e 

.111 CP SECONDS COMPILATION TIME 
Ago 
BEGIN MAIN PROGRAM. 
ENTER SUBROUTINE 1 . 
ENTER SUBROUTINE 2. 

EXIT SUBROUTINE 2. < 

EXIT SUBROUTINE 1. 
END MAIN PROGRAM. 

.005 CP SECONDS EXECUTION TIME 



Listing of compile 
created by Modify 
Notice sequencing 
information . 



DECK1 


1 


DECK1 


2 


DECK1 


3 


DECK1 


4 


DECK1 


5 


DECK1 


6 


DECK1 


7 


DECK3 


1 


DECK3 


2 


DECK3 


3 


DECK3 


4 


DECK3 


5 


DECK3 


6 


DECK2 


1 


DECK2 


2 


DECK2 


3 


DECK2 


4 


DECK2 


5 


DECK2 


6 


DECK2 


7 



| Compile file is used as input to FORTRAN 
"| Extended compiler. 



-Execution of FORTRAN program. 



Figure 3-3. Initialization Directive Examples (Sheet 2 of 2) 



3-5 



60450100 D 



JOBl. 

USER(USEKNUM, PASSWRD, FAMILY) 

CHARGE(CHARNUM,PROJNUM) ~ 

OLD(MAINP) 

COPYSBF<MAINP) 

MODIFY<P=0, F, N=MAINPL, C=0) 

CATALOG (MAINPL, R ) 

SAVE(MAINPL) 

GET(SUBl) 

COPYSBF(SUBl) 

R E WIND ( SUB 1) 

MODIFY(P=0, F, N=ALTPL1, C=0) 

CATALOG (ALTPL1, R) 

GET(ALTPL2) 

CATALOG(ALTPL2,R) 

RENAME(OPL=MAINPL) 

MODIFY(F, N=MAINPL) 

CATALOG (MAINPL, R) 

REPLACE(MAINPL) 

COPYSBF(COMPILE) 

REWIND(COMPILE) 

FTN(I= COMPILE) 

LGO. 

-EOR- 

*CREATE MAINP 

-EOR- 

* CREATE SUB1 

-EOR- 

*OPLFILE ALTPL1 

*COPYPL ALTPL2, DECK3 

-EOI- 



Figure 3-4. Batch Job Creating Program Libraries 
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MODIFICATION DIRECTIVES 



Modification directives and their accompanying 
insertion lines are placed on the directives file 
after the last initialization directive. The first 
occurrence of a modification directive terminates 
the initialization phase. 

The following modification directives assign a 
modification name to the corrections being made, 
identify the deck being modified, and give the 
modification set name to be used when the short 
form of the line identifiers is used. 

IDENT Specifies modification name 

to be assigned to new modifi- 
cation set. 

DECK Identifies deck to be altered. 

MODNAME Identifies modification set 

within deck to be modified 
when short form of line iden- 
tifier is used and the modifi- 
cation name is different from 
that used in the last IDENT or 
MODNAME directive. 

The following modification directives are used for 
inserting and deleting lines. 

DELETE or D Deactivates lines and optionally 
inserts lines in their place. 

RESTORE Reactivates lines and optionally 

inserts text after them. 

INSERT or I Inserts lines after specified 

line. 

These directives indicate to Modify that: 

• New lines are to be inserted into the deck 
and sequenced according to the correct 
modification set identifier. 

• Old lines are to be deleted. 

While inserting, Modify interprets file manipulation 
directives (for example, READPL changes the 
source of insertion lines but does not terminate in- 
sertion). Insertion terminates when Modify next 
encounters another modification directive or end- 
of -record. 

Insertion lines can include compile file directives. 
These directives are not interpreted but are in- 
serted as if they were text; the prefix character 
written on the program library is that specified on 
the directive. 

Other directives described in this section include: 

YANK Deactivate modification set. 

UNYANK Reactivate modification set. 

PURDECK Remove all lines in a deck. 



IGNORE Ignore subsequent modifica- 

tions to a named deck. 

EDIT Modify and write named deck 

to files specified on Modify 
control statement. 



IDENT - IDENTIFY NEW 
MODIFICATION SET 

The IDENT directive assigns a name to a modifica- 
tion set. Modify does not require any IDENT direc- 
tive; however, this practice is discouraged. If the 
directives file does not contain an IDENT directive, 
the system uses ******* as the modname. This 
default name should not be used when a new program 
library is made. The user can use one IDENT for 
several decks or can use several IDENT directives 
for one deck. There is no restriction on the place- 
ment of IDENT within the modification directives 
input file. 

Format: 



-IDENT modname 
modname 



1- to 7 -character modification 
name to be assigned to this 
modification set. This name 
causes a new entry in the 
modification table for each deck 
for which the modification set 
contains a DECK directive until 
the next IDENT. Each line 
inserted by this set, and each 
line for which the status is 
changed, receive a modification 
history byte that indexes this 
modname. 

Normally, sequencing of new 
lines begins with one for each 
deck using the modification 
name. However, when the 
UPDATE directive is used, 
sequence numbers continue 
from deck to deck. 

Omitting modname causes a 
format error. If modname 
duplicates a name previously 
used for modifying a deck. 
Modify generates the message 

DUPLICATE MODIFIER NAME. 

A duplicate modname or en- 
countering modifications that 
refer to this modification name 
prior to this *IDENT modname 
cause a fatal error accompanied 
by the message MOD(S) TO MOD 
BEFORE THIS IDENT CARD. 
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DECK - IDENTIFY DECK TO BE MODIFIED 



The DECK directive identifies the name of the deck 
to which subsequent modifications apply. 

Format: 

*DECK deckname 

deckname Name of deck for which 

modifications following this 
line apply. The modifications 
for this deck terminate with 
the next DECK directive. A 
DECK directive is required 
for each deck being modified. 

If the deckname is not found. 
Modify flags the error with 
the message 

UNKNOWN DECK. 

Omitting the deckname causes 
a format error. 



The next modification directive (or EOR) terminates 
insertion. File manipulation directives are inter- 
preted and may change the source of insertion lines 
but do not terminate insertion and are not inserted 
into the deck. Insertion lines can include compile 
file directives. 

A deactivated line remains on the library and retains 
its sequencing, but is not included in compile decks 
or source decks. 



Formats: 



^DELETE c 
-DELETE Cj, c 2 



or 
or 



*D c 
*D c, 



c l* c 2 



Line identifier for single line 
to be deleted. 

Line identifiers of first and last 
lines in sequence of lines to be 
deleted. Cj must occur before 
C2 on the library. Any lines in 
the sequence that are already in 
active are not affected by the 
DELETE. 



MODNAME - IDENTIFY MODIFICATION 
SET TO BE MODIFIED 

By using the MODNAME directive, the user indicates 
that subsequent line identifiers for which a modifica- 
tion name is omitted apply to modification set 
modname previously applied to the deck. Subsequent 
directives need only the sequence number for the 
modification set. The system assumes that the line 
is in set modname of the deck being modified. 

A MODNAME directive is effective only to the next 
deck or MODNAME directive. The hierarchy for 
line identifiers is such that if the MODNAME direc- 
tive is used and the user wishes to return to use of 
the deckname as the assumed line identifier, he 
must restore the deckname by use of another 
MODNAME directive or use the long form of the 
line identifier, specifying the deck name. A 
MODNAME directive does not terminate an inser- 
tion if it is encountered in text being inserted. 

Format: 

*MODNAME modname 

modname Name of modification set pre- 
viously applied to the deck. 
A line identifier that does not 
specify a modname is assumed 
to apply to this modification 
set. The modname remains 
in effect until another 
MODNAME or DECK direc- 
tive is encountered. 



DELETE - DELETE LINES 

With the DELETE or D directive, the user deacti- 
vates a line or block of lines and optionally replaces 
it with insertion lines following the DELETE direc- 
tive. 



RESTORE - REACTIVATE LINES 

With the RESTORE directive, a user reactivates a 
line or block of lines previously deactivated through 
a delete or yank and optionally inserts additional 
lines after the restored line or block of lines. The 
lines to be inserted immediately follow the RESTORE 
directive. The next modification directive (or EOR) 
terminates insertion. File manipulation directives 
are interpreted (and may change the source of in- 
sertion lines) but do not terminate insertion. They 
are not inserted into the deck. Insertion lines can 
include compile file directives. 

Formats : 

-'RESTORE c 
'-RESTORE Cy c 2 



c l' c 2 



Line identifier of single line to 
be restored. 

Line identifiers of first and last 
lines in sequence of lines to be 
restored. Any lines in the se- 
quence that are already active 
are not affected by the RESTORE. 
CJ must occur before C2 on the 
library. 



INSERT - INSERT LINES 

To insert new lines in the program library, use the 
INSERT directive. The line to be inserted immedi- 
ately follows the INSERT or I directive on the direc- 
tives file. The next modification directive (or EOR) 
terminates insertion. File manipulation directives 
are interpreted (and may change the source for in- 
sertion lines) but do not terminate insertion. They 
are not inserted into the deck. Insertion lines can 
include compile file directives. 
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Formats : 

*INSERT c 
c 



or 



*I c 



Identifies line after which 
new lines will be inserted. 



YANK - REMOVE EFFECTS OF 
MODIFICATION SET 

The YANK directive is used to deactivate a modifi- 
cation set. Modify searches the edited decks for 
all lines affected by the named modification set. 
If a line was activated by the modification set, 
Modify deactivates it. If a line was deactivated by 
the modification set, Modify reactivates it. Thus, 
Modify generates a new modification history byte 
for every line that changed status as a result of the 
YANK and effectively restores the edited decks to 
the status they had prior to modification modname 
or all modifications subsequent to modname. 

For the first format, only the one modification set 
is yanked. For the second format, Modify yanks all 
modification sets applied after modname, provided 
modname appears on the edited decks. YANK or 
UNYANK directives contained in the yanked modifi- 
cation set are not rescinded. 

YANK affects only those decks that are edited 
through the EDIT directive or the F or U options 
on the Modify control statement. In this way, the 
YANK directive can be selective. 



Formats: 



!< YANK modname 
'YANK modname, : 

modname 



Name of modification set pre- 
viously applied to decks in the 
library. Omitting modname 
produces a format error. 
If Modify fails to find the 
modname in the modification 
table for the library, it issues 
an error. 



UNYANK - RESCIND ONE OR MORE 
YANK DIRECTIVES 

With the UNYANK directive, the user can rescind 
previous YANK directives. For the first format, 
only the one modification set is rescinded. For the 
second format, Modify rescinds all of the yanked 
modification sets, starting with modname, provided 
modname appears on the edited decks. 



Formats: 

*UNYANK modname 
*UNYANK modname, * 



first of two or more modifi- 
cation sets to be rescinded 
for the library. Omitting 
modname results in a format 
error. 

PURDECK - PURGE DECK 

A PURDECK directive causes the permanent removal 
of a deck or group of decks from the program li- 
brary. Every line in a deck is purged, regardless 
of the modification set it belongs to. A deck name 
purged as a result of PURDECK can be reused as 
either a deck name or a modification name. 

A PURDECK directive can be any place in the direc- 
tives input. It terminates any previous correction 
set. Therefore, INSERT, DELETE, and RESTORE 
cannot follow a PURDECK directive but must come 
after an IDENT directive. Purging cannot be re- 
scinded. 



Format one: 



*PURDECK dname., dname , , 



, , dname 



modname 



Name of only modification set 
to be rescinded or name of 



dname. Deck names for decks to be 

purged. 

Format two: 

* PURDECK dname .dname. 



The deck named dname a and all decks up to and in- 
cluding dnamejj listed in the deck list are purged. 



IGNORE - IGNORE DECK MODIFICATIONS 

An IGNORE directive causes any further modification 
directives for the designated deck to be ignored. 
Modify skips modification directives other than 
IDENT, EDIT, and DECK. When one of these direc- 
tives is encountered, Modify processes it and re- 
sumes processing the input stream. Any modification 
directives for the decks that precede the IGNORE 
directive are processed normally. The EDIT deck 
name(s) encountered after an IGNORE directive are 
checked against the current ignore list." Any EDIT 
deck names are deleted. If an ignored deck is en- 
countered in the EDIT directive form deckname a . deck- 
name^, the directive is flagged and is considered as 
having a modification error. The following message 
is issued. 

FORMAT ERROR IN DIRECTIVE 
Format: 

* IGNORE dname 



EDIT - EDIT DECKS 

Editing is a process of modifying a deck, if modifi- 
cations are encountered during the modification phase, 
and writing the deck on the compile file, new program 
library, and source file. 

The three possible modes of editing are selective, 
full, and update. The modes are selected through 
Modify control statement options. 
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Format: 



FULL EDIT MODE 



:=EDIT P X ,P 2 . • 



A deckname or range of decknames 
In one of the following forms: 

deckname 

deckname .deckname, 
a b 

The first form requests that Modify 
edit a deck on the program library; 
the second form requests a range of 
decks starting with deckname a and 
ending with deckname;,. If deck- 
names are in the wrong sequence, 
Modify issues the error message: 



NAMES SEPARATED BY 
WRONG ORDER. 



IN 



If Modify fails to find one of the 
decks, it issues the message: 

UNKNOWN DECK - deckname. 



When a full edit is requested (F selected on Modify 
control statement), Modify ignores EDIT directives. 
It writes all decks in the sequence encountered on the 
program library. This option provides for creating 
a complete new program library. Because the same 
decks that are written on the new program library 
are also written on the compile file, a user wishing 
to obtain only a partial set of decks on the compile 
file must request separate runs of Modify — one run 
for creating the new program library and one run 
for creating the compile file. 

If a common deck to be modified is called by a deck 
that precedes the common deck on the OPL, the 
NPL receives a copy of the modified common deck, 
but the compile file receives a copy of the unmodi- 
fied common deck. The programmer can in two 
ways ensure that the compile file receives a copy 
of the modified common deck; the common deck can 
be moved ahead of the calling deck on the OPL be- 
fore the modifications to the decks are made, or a 
second modification run can be made using the NPL 
of the first run as the OPL for the second run. 



SELECTIVE EDIT MODE 

When selective editing is desired (neither F nor U 
selected on the Modify control statement), Modify 
edits only the decks specified on EDIT directives. 
EDIT directives cause a deck to be written regard- 
less of whether it was corrected or not. Decks are 
edited in the sequence encountered on EDIT direc- 
tives unless an UPDATE directive specifies other- 
wise. Modifications encountered during the modifi- 
cation phase are not incorporated in a deck if the 
deck is not specified on an EDIT directive. In 
particular, calling a common deck from within a 
deck being edited does not automatically result in 
the common deck being edited. 

If decks are being replaced or new decks are added, 
the new decks are placed at the end of the library. 
Thus, a deck formerly included in an EDIT sequence 
will no longer lie within the sequence. 

If a common deck is to be modified and a deck that 
calls the common deck is to be modified, the com- 
mon deck must be edited before the calling deck. 
Otherwise, the calling deck will receive a copy of 
the unmodified common deck. 



UPDATE EDIT MODE 

If the U option is selected on the Modify control 
statement, Modify edits only those decks mentioned 
on DECK directives and ignores the EDIT directives. 
Thus, only decks being updated by the Modify run 
are written on the compile file. This mode is not 
normally requested when a new program library or 
source file is desired. 



If a common deck is to be modified and a deck that 
calls the common deck is to be modified, the com- 
mon deck must be edited before the calling deck. 
Otherwise, the calling deck will receive a copy of 
the unmodified common deck. 



MODIFICATION DIRECTIVE EXAMPLES 

Figure 4-1 is a detailed example of some of the 
modification directives presented in this section. 
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batch 
$RFL,0. 

/get,opl=mainpl 
/modify , f , 1=0 , n=mainpl 



*ident modi 

*deck deck3 

*delete deck3.1 

*** subroutine 2, deck deck3. 

*deck deck2 

*d 1 < 

*** subroutine 1 , deck deck2 . 
•insert 3 

* call subroutine sub2 

* in deck2. 
•delete 7 

*** end deck2. 

*deck deckl 

*d 1 

*** main program, deck deckl . 



This modification set is given name MODI. 



I Refer to listing of compile file in figure 3- 
\ to reference line sequence numbers. 



MODIFICATION COMPLETE, 
/copycf, compile 
*** MAIN PROGRAM, DECK DECK1 . 

PROGRAM MAIN(OUTPUT) 

PRINT*, "EEGIN MAIN PROGRAM." 

CALL SUB1 

PRINT*, "END MAIN PROGRAM." 

STOP 

END 
*** SUBROUTINE 2, DECK DECK3. 

SUBROUTINE SUB2 

PRINT*, "ENTER SUBROUTINE 2.' 

PRINT*, "EXIT SUBROUTINE 2." 

RETURN 

END 

SUBROUTINE 1, DECK DECK2. 

SUBROUTINE SUB1 

PRINT*, "ENTER SUBROUTINE 1. 

CALL SUBROUTINE SUB2 

IN DECK2. 

CALL SUB2 

PRINT*, "EXIT SUBROUTINE 1." 

RETURN 

END DECK2. * 



Listing of compile 
file created by 
Modify. 



*** 



END OF INFORMATION ENCOUNTERED 
/modify , 1=0 , p=mainpl , n=mpl 1 , c=com1 
? *ident mod2 
? *deck deck2 
? *restore 7 

? *d modi. 3 < 

? *edit deck2 
1 

MODIFICATION COMPLETE . 
/copycf ,com1 
*** SUBROUTINE 1 , DECK DECK2 

SUBROUTINE SUB1 

PRINT*, "ENTER SUBROUTINE 
* CALL SUBROUTINE SUB2 

CALL SUB2 

PRINT*, "EXIT SUBROUTINE 

RETURN 

END < 

*** 



(Note that user inadvertently deleted END 
I statement. 



1." 



1." 



Modification run to restore deleted line, and 
delete line MODI. 3. 



Note that compile 
file contains only 
edited deck(s). 



•Note deleted line. 



■ END statement restored. 



END DECK2. 
END OF INFORMATION ENCOUNTERED, 
/modify , 1=0 , p=mpl 1 , n=mpl2 , c=com2 
? *ident mod3 
? *deck deck2 
? *modname modi 
? *restore 3 
? *edit deck2 
? 

MODIFICATION COMPLETE . 



M0D1 


1 


DECK1 


2 


DECK1 


3 


DECK1 


K 


DECK1 


5 


DECK1 


6 


DECK1 


7 


M0D1 


1 


DECK3 


2 


DECK3 


3 


DECK3 


4 


DECK3 


5 


DECK3 


6 


M0D1 


1 


DECK2 


2 


DECK2 


3 


M0D1 


2 


M0D1 


3 


DECK2 


4 


DECK2 


5 


DECK2 


6 


M0D1 


4 



M0D1 


1 


DECK2 


2 


DECK2 


3 


M0D1 


2 


DECK2 


4 


DECK2 


5 


DECK2 


6 


DECK2 


7 


M0D1 


4 



Line deleted in previous Modify run is restored. 



Figure 4-1. Modification Directive Examples (Sheet 1 of 2) 
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/copycf ,com2 

*** SUBROUTINE 1, EECK DECK. 

SUBROUTINE SUB1 

PRINT*, "ENTER SUBROUTINE 1." 

* CALL SUBROUTINE SUB2 

* IN DECK2. < Restored line. 

CALL SUB2 

PRINT*, "EXIT SUBROUTINE 1." 
RETURN 
END 
*** END DECK2. 
END OF INFORMATION ENCOUNTERED, 
/rewind ,mainpl ,mpl2 
$RE WIND , MAINPL , MPL2 . 
/libedit , i=0 , p=mainpl , 1=0 , b=mpl2 , c 
EDITING COMPLETE, 
/catalog ,mainpl , r 

CATALOG OF MAINPL FILE 1 

REC NAME TYPE LENGTH CKSUM 



M0D1 


1 


DSCK2 


2 


EECK2 


3 


M0D1 


2 


MOD1 


3 


DECK2 


4 


DECK2 


5 


DECK2 


6 


DECK2 


7 


M0D1 


4 



I The LIBEDIT utility provides a convenient 
means of replacing or adding records on a file. 
Refer to the NOS Reference Manual, volume 1, 
for a description of the LIBEDIT utility. 



DATE 



1 


DECK1 
MOD1 


OPL (64) 


37 


2 


DECK3 
M0D1 


OPL (64) 


34 


3 


DECK2 
M0D1 


OPL (64) 
M0D2 


55 
MOD3 


4 


OPL 


OPLD 


11 


5 


* EOF * 


SUM = 


161 



7732 77/10/07. 

3117 77/10/06. 

3134 77/10/07. 

7477 77/10/07. 



1 

CATALOG COMPLETE, 
/replace ,mainpl 

/modify , 1=0 , p=mainpl , c=com3 , n=nplx < 

? *ident modx - 
? *deck deck2 
? *yank mod3 
? *edit deck2 

9 

MODIFICATION COMPLETE . 
/catalog, nplx,r 

CATALOG OF NPLX FILE 



{Temporary modification run to deactivate 
modification set MOD 3 and selectively edit 
deck DECK2. 



REC 


NAME 


TYPE LENGTH 


CKSUM 


DATE 


1 


DECK2 
M0D1 


OPL (64) 55 
M0D2 (MOD 3 "> 


4734 


77/10/07. 


2 


OPL 


OPLD 3 \ 


2117 


77/10/07. 


3 


* EOF * 


SUM = 60 


\ fNote 


that vanlfp 



1 

CATALOG COMPLETE, 
/copycf ,com3 
*** SUBROUTINE 1, DECK DECK2. 

SUBROUTINE SUB1' 

PRINT*, "ENTER SUBROUTINE 1." 
* CALL SUBROUTINE SUB2 

CALL SUB2 

PRINT*, "EXIT SUBROUTINE 1." 

RETURN 

END 
*** END DECK2. 
END OF INFORMATION ENCOUNTERED. 



(Note that yanked modification set is enclosed in 
| parentheses. 



Compare with previous 
compile file of DECK2. 



M0D1 


1 


DECK2 


2 


DECK2 


3 


M0D1 


2 


DECK2 


4 


DECK2 


5 


DECK2 


6 


DECK2 


7 


M0D1 


4 



Figure 4-1. Modification Directive Examples (Sheet 2 of 2) 
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FILE MANIPULATION DIRECTIVES 



File manipulation directives allow user control over 
files during the initialization and modification 
phases. Two of these directives, READ and 
READPL, may be used to change the source of di- 
rectives and insertion text from the directives file 
to an alternate file. While an insertion is in prog- 
ress, a file change does not terminate insertion. 
Insertion continues until Modify reads the next 
modification directive. File manipulation directives 
are illegal when Modify is reading from an alternate 
file and result in the following message: 

OPERATION ILLEGAL FROM ALTERNATE FILE 
INPUT. 

The file manipulation directives include: 

READ Read record or group of records 

from specified file. 

READPL Read deck or portion of deck from 
program library. 

BKSP Backspace specified number of 

records on file. 

SKIP Skip forward specified number of 

records on file. 

SKIPR Skip forward past the specified 

record on file. 

REWIND Rewind named files. 

RETURN Return named files to system. 



These operations cannot be performed on the follow- 
ing reserved files (or their equivalents). 



INPUT 

OUTPUT 

COMPILE 

SOURCE 

OPL 

NPL 

SCR1 

SCR 2 

SCR3 



Source of directives 
Statistics output 
Compile 
Source output 
Old program library 
New program library 
Scratch file 1 
Scratch file 2 
Scratch file 3 



These file names are reserved only through their 
respective Modify control statement options. For 
example, if the S option is not specified, the file 
SOURCE is not reserved and the user can use file 
manipulation directives specifying a file of that 
name. However, file names SCR1, SCR2, and 
SCR 3 should not be used. 



READ - READ ALTERNATE 
DIRECTIVES FILE 

The READ directive causes Modify to temporarily 
stop reading the directives file and begin reading 
directives and insertion text from the specified 
record on the named file or current position if 
deckname is omitted (or *). Unless * is the 
deckname field, Modify reads from the alternate 
directives file until it encounters an end-of-record 
and then resumes with the next directive on the 
primary directives file. 

If Modify is unable to find the named record, it 
issues the message 

RECORD NOT FOUND. 

Formats: 

*READ file 
*READ file, dname 
*READ file, * 

file Name of file containing insertion 

text and/or directives. 

dname Optional; if dname is specified, 

text must be in source file 
format; that is, the first word 
of record is the name of the 
record. Modify discards the 
name before processing any 
text. 

* Optional; if specified. Modify 

processes all records on the 
file up to an end-of-file or a 
zero-length record. These 
records must be in source file 
format. 



READPL - READ PROGRAM LIBRARY 

The READPL directive causes Modify to temporarily 
stop reading the directives file and begin reading 
directives and insertion text from the specified 
Modify deck. It allows a user to insert text from 
one deck on the program library into another program, 
or to move text within a program. 

Formats: 

*READPL dname 
*READPL dname, c,, c„ 



dname 



c l* C 2 



Name of deck on old program 
library. 

Portion of deck to be read; 
must be more than one line. 
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Modify inserts all the active lines in the deck or 
portion of the deck specified by the READPL. If 
ci, C2 are omitted, it reads the entire deck before 
returning to the directive file. 



NOTE 



During processing of the READPL direc- 
tive, Modify does not perform any modi- 
fications to the text in the deck it is read- 
ing. If the user wishes the new text to be 
modified, he must make the corrections 
to the deck into which the text is being 
inserted; that is, the text is taken from 
the deck exactly as it is on the program 
library. 



BKSP - BACKSPACE FILE 

The BKSP directive repositions the named file one 
or more logical records in the reverse direction. 
It does not backspace beyond the beginning-of-infor- 
mation. 

Formats : 



SKIPlR - SKIP FORWARD PAST RECORD 

The SKIPR directive repositions the named file 
forward past the specified logical record. It does 
not position the file past the end -of -information. 
If Modify is unable to locate the record in the for- 
ward search, it positions the file at the end-of-infor- 
mation and issues the message 

RECORD NOT FOUND. 

Format: 

*SKIPR file, rname 

file Name of file to be positioned. 

rname Name of record on file that file 
is positioned after. 

REWIND - REWIND FILES 

The REWIND directive repositions one or more files 
to their first records. 



*BKSP file 
*BKSP file, n 

file 
n 



Name of file to be positioned. 

Number of records to be 
skipped in the reverse direc- 
tion. If n is omitted, Modify 
backspaces one record. 



Format: 



*REWIND file j. file 2 , .... file n 



file. 



Names of files to be rewound. 



RETURN - RETURN FILES TO SYSTEM 



SKIP - SKIP FORWARD ON FILE 

The SKIP directive repositions the named file for- 
ward one or more logical records. If an end-of- 
information is encountered before the requested 
number of records has been skipped, the file is 
positioned at the end -of -information. 

Formats : 



The RETURN directive immediately returns files to 
the operating system. 



Format: 



*RETURN file 1 , file 2 , , 



. , file,. 



file. 



Names of file to be returned. 



*SKIP file 
*SKIP file, n 

file 
n 



Name of file to be positioned. 

Number of records to be 
skipped in the forward direc- 
tion. If n is omitted. Modify 
skips one record. 



FILE MANIPULATION DIRECTIVE EXAMPLES 



Figure 5-1 illustrates several of the file manipulation 
directives discussed in this section. 
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batch 
$RFL,0. 

/old, dirfil * ■ 

/lnh , r 

PRINT*, "LINE 1 ADDED BY MODIFICATION SET MODX." 
__EOF— 

PRINT*, "LIKE 2 ADDED BY MODIFICATION SET MODX." 
--EOR-- 
DECKX 

PRINT*, "LINE 3 ADDED BY MODIFICATION SET MODX." 
__EOR— 
*EDTT DECK1 
*EDIT DECK2 
*EDIT" DECK3 
--EOR-- 

/old , opl=mainpl 
/get, dirfil 
/modify ,1=0 ,n=newpl ,c=comx 

*skip dirfil,2 

*ident modx 

*deck deck2 



-Alternate directives file. 



*1 ? 

*read dirfil.deckx 

*bksp dirfil,2 

*deck deck3 

*i 3 

*read dirfil 

*rewind dirfil 

*deck deckl 

*i 4 

*read dirfil 

*skipr dirfil,deckx 

*read dirfil 

*retum dirfil 



File manipulation directives. 



MODIFICATION COMPLETE, 
/copycf ,comx 
*** MAIN PROGRAM, DECK DECKL 

PROGRAM MAIN (OUTPUT) 

PRINT*, "BEGIN MAIN PROGRAM." 

CALL SUB1 

PRINT*, "LINE 1 ADDED BY MODIFICATION SET MODX." 

PRINT*, "END MAIN PROGRAM." 

STOP 

END 
*** SUBROUTINE 1, DECK DECK2. 

SUBROUTINE SUB1 

PRINT*, "LINE 3 ADDED BY MODIFICATION SET" MODX." 

PRINT*, "ENTER SUBROUTINE 1." 

* CALL SUBROUTINE SUB2 

* IN DSCK2. 
CftLL SUB2 

PRINT*, "EXIT SUBROUTINE 1." 
RETURN 
END 

END DECK2. 

SUBROUTINE 2, DECK DECK3. 
SUBROUTINE SUB2 

PRINT*, "ENTER SUBROUTINE 2." 

PRINT*, "LINE 2 ADDED BY MODIFICATION SET MODX." 
PRINT*, "EXIT SUBROUTINE 2." 
RETURN 
END 
END OF INFORMATION ENCOUNTERED. 



*** 



Compile file containing 
modifications from 
alternate directives 
file. 



MOD1 


1 


DECK1 


2 


DECK1 


3 


DECK1 


4 


MODX 


1 


DECK1 


5 


DECK1 


6 


DECK1 


7 


M0D1 


1 


DECK2 


2 


MODX 


1 


DECK2 


3 


MOD1 


2 


M0D1 


3 


DECK2 


4 


DECK2 


5 


DECK2 


6 


DECK2 


7 


MOD1 


4 


K)D1 


1 


DECK3 


2 


DECK3 


3 


MODX 


1 


DECK3 


4 


DECK3 


5 


DECK3 


6 



Figure 5-1. File Manipulation Directive Examples (Sheet 1 of 2) 
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/catalog , newpl , r 

CATALOG OF NEWPL 
REC NAME TYPE 


FILE 
LENGTH 


1 
CKSUM 


DATE 


1 


DECK1 
MOD1 


OPL (64) 
MODX 


47 


7152 


77/10/07 


2 


DECK2 
MOD1 


OPL (64) 
M0D2 


65 
MOD3 


7111 
MODX 


77/10/07 


3 


DECK3 
MOD1 


OPL (64) 
MODX 


44 


7430 


77/10/06 


4 


OPL 


OPLD 


7 


7403 


77/10/10 


5 


* EOF * ' 


SUM = 


207 







1 

CATALOG COMPLETE, 
/rewind, comx 
*REWIND,COMX. 
/ftn,i=comx,l=0 

.145 CP SECONDS COMPILATION TIME 
Ago 

BEGIN MAIN PROGRAM. 

LINE 3 ADDED BY MODIFICATION SET MODX. 

ENTER SUBROUTINE 1 . 

ENTER SUBROUTINE 2. 

LINE 2 ADDED BY MODIFICATION SET" MODX. 

EXIT SUBROUTINE 2. 

EXIT" SUBROUTINE. 1 . 

LINE 1 ADDED BY MODIFICATION SET" MODX. 

END MAIN PRCWRAM. 

.007 CP SECONDS EXECUTION TIME 



Execution of modified program. 



Figure 5-1. File Manipulation Directive Examples (Sheet 2 of 2) 
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COMPILE FILE DIRECTIVES 



The directives described in this section provide 
user control during the write compile file phase. 
These directives are interpreted at the time the 
program library decks are written onto the compile 
file. A call for a common deck results in the deck 
being written on the compile file. Other directives 
allow control of file format. 

The user can prepare his original source deck with 
compile file directives embedded in it, or he can 
insert compile file directives into program library 
decks as a part of a modification set. Compile file 
directives are not recognized when they are on the 
directives file; they do not terminate insertion, but 
are simply considered as text lines to be inserted. 

Compile file directives include: 

CALL Write called deck onto com- 

pile file. 

"rFCALL Write called deck onto com- 

pile file if name is defined. 

NIFCALL Write called deck onto com- 

pile file if name is not de- 
fined. 

CALLALL Write all decks onto compile 

file that have deckname be- 
ginning with specified char- 
acter string. 

IF Include lines in compile file 

if specified attribute is true 
and until a reversal directive 
is encountered (ELSE or 
ENDIF). 

ELSE Reverse an IF directive con- 

ditional range. 



WEOF 



Write end-'of-file on compile 
file. 



ENDIF 


Terminate an IF directive 
conditional range. 


COMMENT 


Generate COMMENT pseudo 
instruction for COMPASS. 


WIDTH 


Define number of columns 
preceding sequence informa- 
tion on compile file. 


NOSEQ 


Specify no sequence infor- 
mation on compile file. 


SEQ 


Specify sequence informa- 
tion on compile file. 


WEOR 


Write end-of-record on com 
pile file. 


CWEOR 


Write end-of-record on com 
pile file if the buffer is not 
empty. 



NOTE 



A common deck cannot call another 
common deck. That is, if the directives 
CALL, IFCALL, NIFCALL, or CALL- 
ALL are in a common deck, they are 
ignored. 



CALL - CALL COMMON DECK 

Modify places a copy of the requested deck on the 
compile file. It does not copy the request to the 
compile file. However, the new program library 
and the source file contain the CALL directive. 

Format: 

*CALL deckname 

deckname Name of common deck to be 
written on compile file. 



IFCALL - CONDITIONALLY CALL 
COMMON DECKS 

Modify places a copy of the requested deck on the 
compile file if the conditional name has been defined 
on a DEFINE directive during the modification 
phase. If the name has not been defined, the com- 
mon deck is not written on the compile file. Modify 
does not copy the IFCALL directive to the compile 
file. 

Format: 

*IFCALL name, deckname 

name 1- to 7 -character conditional 

name. 

deckname Name of common deck to be 

written on compile file if name 
is defined. 



NIFCALL - CONDITIONALLY CALL 
COMMON DECKS 

Modify places a copy of the requested deck on the 
compile file if the conditional name has not been 
defined (refer to DEFINE directive, section 7) 
during the modification phase. If the name has 
been defined, the common deck is not written on 
the compile file. 
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Format: 

*NIFCALL name, deckname 

name 1- to 7 -character conditional 

name. 

deckname Name of common deck to be 
written on compile file if 
name is not defined. 



CALLALL - CALL RELATED 
COMMON DECKS 

Modify places a copy on the compile file of every 
deck name beginning with the specified character 
string. 

Format: 

*CALLALL string 



IF - TEST FOR CONDITIONAL RANGE 

Modify tests the specified condition and, if true, 
writes all following lines onto the compile file un- 
til encountering a reversal (ELSE) or termination 
(ENDIF) directive. If the condition is false, the 
lines are skipped until a reversal or termination 
directive is encountered. Lines skipped in such 
a range are treated as inactive. 



Format: 



^IF atr, name, value 
atr 



Attribute; must be one of the 
following: 

DEF name defined 

UNDEF name undefined 
EQ name equal to value 

NE name not equal to 

value 



ELSE - REVERSE CONDITIONAL RANGE 



ELSE is a conditional range reversal directive. 
When encountered, the effects of a previous IF 
directive are reversed. An ELSE directive en- 
countered without an IF range in progress is 
diagnosed as an error. 

Format: 

*ELSE 



ENDIF - TERMINATE CONDITIONAL RANGE 



ENDIF is a conditional range termination directive. 
When encountered, the effects of a previous IF 
directive are terminated. An ENDIF directive en- 
countered without an IF range in progress is diag- 
nosed as an error. 

Format: 

*ENDIF 



COMMENT - CREATE COMMENT LINE 

This directive causes Modify to create a COMPASS 
language COMMENT pseudo instruction (beginning 
in column 3) in the following format. Modify obtains 
the dates from the operating system. 



LOCATION 


OPERATION 


VARIABLE SUBFIEIDS 


COMMENT 


crdate 


moddate comments 



crdate Creation date in the format 

Ayy/mm/dd. 

moddate Modification date in the format 
Ayy/mm/dd. 

Format: 

^COMMENT comments 

comments Character string. 

WIDTH - SET LINE WIDTH ON 
COMPILE FILE 

The WIDTH directive allows the user to change the 
width of lines during the compile phase. Modify 
uses the new width until it encounters another 
WIDTH directive. 

Format: 

*WIDTH n 

n Number of columns preceding 

sequence information on com- 
pile file and source file. 
Modify allows a maximum of 
100 columns. 



NOTE 



During initialization of Modify, width is 
set to 72; additional columns of data are 
truncated. 
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NOSEQ - NO SEQUENCE INFORMATION 

The NOSEQ directive allows the user to set the no 
sequence flag during the write compile file phase. 
When no sequence information is requested. Modify 
does not include sequence information on the com- 
pile file. A. SEQ directive encountered subsequent 
to NOSEQ resumes sequencing. 

Format: 

*NOSEQ 



CWEOR - CONDITIONALLY WRITE END 
OF RECORD 

Modify writes an end-of -record on the compile file 
if information has been placed in the buffer since the 
last end-of-record was written. 

Format: 

*CWEOR 



SEQ - INCLUDE SEQUENCE INFORMATION 

The SEQ directive allows the user to clear the no 
sequence flag during the write compile file phase and 
to begin placing sequence information on the compile 
file. A NOSEQ directive encountered subsequent to 
a SEQ sets the no sequence flag. 

Format: 

*SEQ 

WEOR - WRITE END OF RECORD 

Modify unconditionally writes an end-of-record on 
the compile file when encountering the WEOR direc- 
tive. 

Format: 

*WEOR 



WEOF - WRITE END OF FILE 

Modify writes an end-of-file on the compile file. 
Format: 

*WEOF 



COMPILE FILE DIRECTIVE EXAMPLES 

Figure 6-1 illustrates several of the compile file 
directives presented in this section. 
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batch 

$RFL,0. 

/old , opl=mainpl 

/get, csub 

/copycrjCSUb 

DECK4 



*COMMENT" 
*** 

*NIFCALL 
SUB3 



JOT 



EQ 
USE 
BSS 
END 
COPY COMPLETE. 
/copycr,csub 
DECK5 
COMMON 
ORIGIN 



IDENT SUB3 
ENTRY SUB3 
CALL DECK DECK5 
CALL COMMON DECK. 
MYTEXT,DECK5 < — 
DATA 
ORIGIN JOT 

SUB3 

// 

1 



ENTRY/EXIT" 



RETURN 



Copy of source file to be incorporated into 
program library. 



{Notice call to common deck DECK5. If MYTEXT is 
defined during the modification run, DECK5 is not 
written on the compile file. 



A 

66B 

24 

-X0*X1 

24 

A 



GET JOB ORIGIN 



STORE JOB ORIGIN 



MACRO 

SA1 

MXO 

BX6 

AX6 

>SA6. 

ENDM 
COPY COMPLETE . 
/modify , f , p=0 , 1=0 , n=mainpl , c=cdm1 , s=mainp 
? *oplfile opl 
? *rewind csub 
? *create csub 

? *-ident mod4 Modify run to create new program library 

? *deck deckl consisting of source file and OPL. 

i 2 



»i 3 



common jot 



call sub3 

If ( jot . eq . 3)print* , "time-sharing job. 
if ( jot. ne.3)prirt», "batch job." 
*deck deck4 



? »i 



"weor 

*deck deck3 
*i 
*weor 

*deck deck2 
*i 



Addition of compile file directives,, 



MODIFICATION COMPLETE, 
/catalog ,mainpl , r 



REC 


CATALOG 
NAM3 


OF MAINPL 
TYPE 


FILE 
LENGTH 


1 


DECK1 
M0D1 


OPL (64) 
M0D4 


61 


2 


DECK3 
M0D1 


OPL (64) 
M0D4 


37 


3 


DECK2 
M0D1 


OPL (64) 
M0D2 


60 
M0D3 


4 


DECK4 
«)D4 


OPL (64) 


47 


5 
6 


DECK5 
OPL 


OPLC (64) 
OPLD 


27 
13 


7 


* EOF * 


SUM = 


311 


CATALOG 


COMPLETE . 







1 

CKSUM 



DATE 



3171 77/10/07. 



2333 



3077 
M0D4 

5063 



6354 
3706 



77/10/06. 
77/10/07. 
77/10/10. 



77/10/10. 
77/10/10. 



Since no modifications are made to the common 
deck (DECK5), it is acceptable to have the com- 
mon deck after the calling deck (DECK4) on the 
program library. The next section will show 
how to rearrange the decks on the program 
library. 



Figure 6-1. Compile File Directive Examples (Sheet 1 of 3) 
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/copycr,com1 

*** MAIN PROGRAM, DECK EECK1 . 

PROGRAM MAIN(OUTPUT) 

COMMON JOT 

PRINT*, "BEGIN MAIN PROGRAM." 

CALL SUB3 

IF( JOT. EO, 3) PRINT* , "TIffi-SHARING JOB." 

IF ( JOT . NE . 3 ) PRINT* , "BATCH JOB . " 

CALL SUB1 

PRINT*, "END MAIN PROGRAM." 

STOP 

END 
COPY COMPLETE. 
/copycr,com1 
*** SUBROUTINE 2, DECK DECK3. 

SUBROUTINE SUB2 

PRINT*, "ENTER SUBROUTINE 2." 

PRINT*, "EXIT SUBROUTINE 2." 

RETURN 

END 
COPY COMPLETE. 
/copycr,com1 
*** SUBROUTINE 1, DECK DECK2. 

SUBROUTINE SUB1 

PRINT*, "ENTER SUBROUTINE 1." 

* CALL SUBROUTINE SUB2 

* IN DECK2. 
CALL SUB2 

PRINT*, "EXIT SUBROUTINE 1." 
RETURN 
END 
*** END DECK2. 
COPY COMPLETE, 
/copycr, coral 

IDENT 
ENTRY 



Listing of compile file. 
Notice separation into 
records. 



SUB3 
SUB3 



COMNENT 77/10/10. 77/10/10. CALL DECK DECK5 
** CALL COMMON DECK. 
OFIGIN MACRO A 

66B 

24 

-X0*X1 

24 

A 



GET JOB ORIGIN 



STORE JOB ORIGIN 



ENTRY/EXIT 



SA1 
MXO 
BX6 
AX6 
SA6 
ENDM 
SUB3 DATA 

ORIGIN JOT 

EQ SUB3 RETURN 

USE // 
JOT BSS 1 

END 
COPY COMPLETE. 
/copycr,com1 

END OF INFORMATION ENCOUNTERED, 
/replace ,mainpl 
/pack-,com1 
PACK COMPLETE. 
/ftn,i=com1 ,1=0 

.401 CP SECONDS COMPILATION TIME 
Ago 
BEGIN MAIN PROGRAM. 
TIME-SHARING JOB. 
ENTER SUBROUTINE 1 . 
ENTER SUBROUTINE 2. 
EOT SUBROUTINE 2. 
EXIT SUBROUTINE 1 . 
r ND MAIN PROGRAM. 

.007 CP SECONDS EXECUTION TIME 
/primary, mainp 
*PRIMARY,MAINP. 



Notice that Modify has 
replaced *COMMENT 
directive with COMPASS 
COMMENT statement on 
compile file. 



MYTEXT was not de- 
fined during the modifi- 
cation run. Thus, the 
contents of DECK5 have 
been written on the com- 
pile file. 



MOD1 


1 


DECK1 


2 


MOD4 


1 


DEOC1 


3 


M0D4 


2 


MOD4 


3 


MOD4 


4 


DECK1 


4 


DECK1 


5 


DECK1 


6 


DECK1 


7 


MOD1 


1 


DECK3 


2 


DECK3 


3 


DECK3 


4 


DECK3 


5 


DECK3 


6 


MOD1 


1 


DECK2 


2 


DECK2 


3 


»'OD1 


2 


M0D1 


3 


DECK2 


4 


DECK2 


5 


DECK2 


6 


DECK2 


7 


M0D1 


4 


DECK4 


1 


DECK4 


2 


DECK4 


3 


DECK4 


4 


DECK5 


1 


DECK5 


2 


DECK5 


3 


DECK5 


4 


DECK5 


5 


DECK5 


6 


DECK5 


7 


DECK4 


6 


DECK4 


7 


DECK4 


8 


DECK4 


9 


DECK4 


10 


DECK4 


11 



Figure 6-1. Compile File Directive Examples (Sheet 2 of 3) 
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/lnh,] 

DECK1 

*** 



MAIN PROGRAM, DECK DECK1 . 

PROGRAM MAIN(OUTPUf) 

COMMON JOT 

PRINT*, "BEGIN MAIN PROGRAM." 

CALL SUB3 

IF( JOT .EQ . 3 ) PRINT* , "TIMS-SHARING JOB . " 

IF( JOT.NE . 3) PRINT* , "BATCH JOB." 

CALL SOB1 

PRINT*, "END MAIN PROGRAM." 

STOP 

END 



--EOR- 
DECK3 
*WEOR 
*** 



Contents of source file created by Modify.,, 



SUBROUTINE 2, DECK DECK3. 
SUBROUTINE SUBS- 
PRINT*, "ENTER- SUBROUTINE 2. 
PRINT*, "EXIT SUBROUTINE 2." 
RETURN 
END 



— EOR- 
DECK2 
*WEOR 
♦** 



***■ 

— EOR-- 

DECK4 

*WEOR 



*COMNENT 
*#* 

*NIFCALL 
SUB? 



JOT 

__EOR— 
DECK5 
COMMON 
ORIGIN 



SUBROUTINE 1, DECK DECK2. 

SUBROUTINE SUET 

PRINT*, "ENTER SUBROUTINE T . " 

CALL SUBROUTINE SUB2 

IN DECK2. 

CALL SUB2 

PRINT*, "EXIT SUBROUTINE 1 ." 

RETURN 

END 

END EGCK2. 



—EOR— 



IDENT SUB3 
ENTRY SUB3 
CALL DECK DECK5 
CALL COMMON DECK. 
MYTEXT,EE~CK5 
DATA 
ORIGIN JOT 



Note that source file contains call to common 
deck. 



EO 
USE 
BSS 
END 



MACRO 

SA1 

MXO 

BX6 

AX6 

SA6 

ENDM 



SUB3 

// 

1 



A 

66B 

24- 

-X0*X1 

24 

A 



ENTRY/EXIT- 



RETURN 



GET' JOB ORIGIN 



STORE JOB ORIGIN 



Figure 6-1. Compile File Directive Examples (Sheet 3 of 3)< 
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SPECIAL DIRECTIVES 



The directives described in this section provide 
extended features. They can be any place in the 
directive file for either creation or correction and 
primarily affect the operating features of Modify. 



/ 
PREFIX 



PREFIXC 



INWIDTH 



DEFINE 



MOVE 



UPDATE 



List comment, 

Changes prefix character for 
directives other than compile 
file directives. 

Changes prefix character for 
compile file directives. 

Sets width of input line to be 
compressed. 

Defines name under which sub- 
sequent IFCALL directive may 
cause a common deck to be 
written, or NIFCALL may 
prevent a common deck from 
being written. 

Moves decks on new program 
library. 

Specifies editing sequence 
and modification set number- 
ing. 



/ - LIST COMMENT 

Other than being copied onto the Modify statistics 
(list) output, a comment line is ignored. It can 
occur any place in the directives file. 

Format: 

*/ comment 
Example: 

*/ ******MODIFICATIONS****** 



PREFIX - CHANGE MODIFY 
DIRECTIVES PREFIX 

The PREFIX directive resets the prefix character 
for subsequent Modify directives. It does not affect 
the prefix of compile file directives. When Modify 
is initialized, the character is preset to *. Modify 
uses * if a PREFIX directive is not used. 

Format: 



* PREFIX x 



Character used in first column 
of directive (except compile 
file directive). A blank char- 
acter is illegal. 



PREFIXC - CHANGE COMPILE FILE 
DIRECTIVES PREFIX 

The PREFIXC directive resets the compile direc- 
tive character so that only compile file directives 
with the x prefix are recognized. If a PREFIXC 
directive is not encountered, the default (*) is used. 

Format: 



-PREFIXC x 



Character used in first column 
of compile file directive. A 
blank character is illegal. 



INWIDTH - SET WIDTH OF INPUT TEXT 



The INWIDTH directive allows the user to set the 
width of input text from primary and alternate sources 
before it is compressed and written in the Modify 
library deck. An INWIDTH directive takes prece- 
dence over any previously defined width. INWIDTH 
can be placed anywhere in the directives file. 



Format: 



^INWIDTH n 
n 



Number of columns on input 
line to be compressed. Modify 
allows a maximum of 100 
columns. During initialization 
of Modify, width is preset to 
72. 



DEFINE - DEFINE NAME FOR USE BY 
IFCALL, NIFCALL, IF 

By defining a name and its associated value, a user 
establishes the conditions that must be met for a 
conditional call of a common deck. This allows 
external control of the calls embedded in source 
decks. If the name is not defined, an IFCALL for 
a common deck is ignored. If the name is defined, 
a NIFCALL for a common deck is ignored. A 
DEFINE directive must be processed in order for 
an IF conditional test to be true. 

Format: 

*DEFINE name, value 

name Name used in compile file 

IFCALL, NIFCALL, or IF 
directive. 

value Value assigned to symbol 

name (maximum value may be 
3777777B). If omitted, name 
is defined with value zero. 
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MOVE - MOVE DECKS 

The MOVE directive enables the user to reorder 
decks while producing a new program library. The 
decks, dname, are moved from their positions on 
the old library and placed after dname r on the new 
library. 



each deck using the same IDENT. UPDATE also 
causes the order in which decks are edited to be 
according to their sequence on the old program 
library. 

Format: 

*UPDATE 



Format: 



*MOVE dname , dname. , dname,,dname h 



UPDATE - UPDATE LIBRARY 



SPECIAL DIRECTIVE EXAMPLES 

Figure 7-1 illustrates several special directives. 
Note that compile file directives can be ignored 
(depending on language processor) by changing the 
compile file prefix character. 



Use of this directive causes Modify to continue 
sequencing rather than restart sequencing with 



I 



batch 

$RFL,0. 

/old , opl=mainpl 

/modify, f ,c=com1 ,n=mainpl,l=0 

? */ change prefix character to # 

? *prefix # ■* : 

? #ident mod6 

? #deck deck4 

? #i 4 

? space 4 

? #prefixc # * 

? #move deck5 , deckl , deck2 , deck3 , deck4 
? 

MODIFICATION COMPLETE, 
/catalog ,mainpl , r 



REC 


CATALOG 
NAME 


OF MAINPL 
TYPE 


FILE 
LENGTH 


1 
CKSUM 


DATE 


1 
2 


DECK5 

DECK! 

M0D1 


OPLC (64) 
OPL (64) 
M0D4 


27 
61 


6354 
3171 


tv 'm 'm r 


t I / IU/ IU . * 

77/10/07. 


3 


DECK2 
M0D1 


OPL (64) 
M0D2 


60 
M0D3 


3077 
M0D4 


77/10/07. 


4 


DECK3 
M0D1 


OPL (64) 
M0D4 


37 


2333 


77/10/06. 


5 


DECK4 
M0D4 


OPL (64) 
M0D6 


53 


3057 


77/10/10. 


6 


OPL 


OPLD 


.13 


1175 


77/10/10. 


7 


* EOF * 


SUM = 


315 


• 





-Change Modify directive prefix character. 



Change compile file prefix character so 
directives on program library will be inter- 
preted as comments. 



The common deck (DECK5) now comes 
before any deck that might call it. 



CATALOG COMPLETE, 
/replace ,mainpl 



Figure 7-1. Special Directive Examples (Sheet 1 of 3) 
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/copycr,com1 



*WEOR 



*** 

*WE()R 



*WEOR 



MAIN PROGRAM, DECK DECK1 . 
PROGRAM MAIN( OUTPUT") 
COMMON JOT- 
PRINT*, "EEGIN MAIN PR(X5RAM." 
CALL SUB3 

IF(JOT.EQ.3)PRINT*,"TBE-SHARING JOB." 
IF ( JOT . NE . 3 ) PRINT* , "BATCH JOB . " 
CALL SUB1 

PRINT*, "END MAIN PROGRAM." 
STOP 
END 

SUBROUTINE 1, DECK DECK2. 

SUBROUTINE SUB1 

PRINT*, "ENTER SUBROUTINE 1." 

CALL SUBROUTINE SUB2 

IN DECK2. 

CALL SUB2 

PRINT*, "EXIT SUBROUTINE 1." 

RETURN 

END 

END DECK2. 

SUBROUTINE 2, DECK DECK3. 

SUBROUTINE SUB2 

PRINT*, "ENTER SUBROUTINE 2." 

PRINT* , "EXIT SUBROUTINE 2." 

RETURN 

END 



Listing of compile file. 
Compile file directives 
have been ignored. 



*commh;nt 
*** 

*CALL 
SUB3 



IDENT SUB3 
ENTRY SUB3 
CALL DECK DECK5 
CALL COMMON DECK. 
SPACE 4 
DECK5 

DATA ENTRY/EXIT 

ORIGIN JOT 

EQ SUB^i RETURN 

USE // 
JOT BSS 1 

END 
COPY COMPLETE. 
/copycr,com1 

FND OF INFORMATION ENCOUNTERED, 
/modify , c=com2 , 1=0 , n=mainpl , u 
*define example 
*ident mod7 
*deck deck! 
*modname mod4 
* insert 2 
*if def, example 

print*, "example has been defined." 
*else 

print*, "example has not been defined 
*endif 



MOD1 


1 


DECK1 


2 


MOD4 


1 


DECK1 


3 


M0D4 


2 


M0D4 


3 


M0D4 


4 


DECK1 


4 


DECK1 


5 


DECK1 


6 


DECK1 


7 


MOD4 


1 


MOD1 


1 


DECK2 


2 


DECK2 


3 


MOD1 


2 


MOD1 


3 


DECK2 


4 


DECK2 


5 


DEOC2 


6 


DECK2 


7 


MOD1 


4 


MOD4 


1 


MOD1 


1 


DECK3 


2 


DECK3 


3 


DEOC3 


4 


DEOC3 


5 


DECK3 


6 


MOD4 


1 


DECK4 


1 


DECK4 


2 


DECK4 


3 


DECK4 


4 


M0D6 


1 


DECK4 


5 


DECK4 


6 


DECK4 


7 


DECK4 


8 


DECK4 


9 


DECK4 


10 


DECK4 


11 



EXAMPLE is defined before modset 
MOD7 is identified. Thus, when modset 
MOD7 goes into effect during this modifi- 
cation run, EXAMPLE will be defined 
but not as part of modset MOD7. 



MODIFICATION COMPLETE . 
/copycf ,com2 
*** MAIN PROGRAM, DECK DECK 1 . 

PROGRAM MAIN(OUTPUT) 

COMMON JOT 

PRINT*, "ffiGIN MAIN PROGRAM." 

CALL SUB3 

PRINT*, "EXAMPLE HAS BEEN DEFINED." < Inserted line. 

IF( JOT .EQ. 3) PRINT* , "TIME-SHARING JOB." 

IF( JOT. NE.3)PRINT*, "BATCH JOB." 

CALL SUB1 

PRINT*, "END MAIN PROGRAM." 

STOP 

END 
END OF INFORMATION ENCOUNTERED. 



MOD1 


1 


DECK1 


2 


MOD4 


1 


DECK1 


3 


MOD4 


2 


MOD7 


2 


MOD4 


3 


MOD4 


4 


DECK1 


4 


DECK1 


5 


DECK1 


6 


DECK1 


7 



Figure 7-1. Special Directive Examples (Sheet 2 of 3) 
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/modify , c=com3 , 1=0 , p=mainpl 

? *edit deck! 

1 

MODIFICATION COMPLETE, 
/copycf ,com3 
*** MAIN PROGRAM, DECK DECK1 . 

PROGRAM MAIN(OUTPUT) 

COMMON JOT 

PRINT*, "BEGIN MAIN PROGRAM." ■ 

CALL SUB3 

PRINT*, "EXAMPLE HAS NOT BEEN DEFINED." 

IF( JOT .EQ. 3)PRINT*, "TIME-SHARING JOB." 

IF( JOT. tE.3)PRINT*, "BATCH JOB." 

CALL SUB1 

PRINT*, "END MAIN PROGRAM." 

STOP 

END 
END OF INFORMATION ENCOUNTERED. 



EXAMPLE is not defined during 
this modification run. The *ELSE 
path in modset MOD7 will be taken. 





M0D1 


1 




DSCK1 


2 




M0D4 


1 




DECK1 


3 




M0D4 


2 


Inserted line. 


MOD7 


4 




MOD4 


3 




MOD4 


4 




DECK'1 


4 




DECK1 


5 




DECK1 


6 




DECK! 


7 



Figure 7-1. Special Directives Examples (Sheet 3 of 3) 
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The following control statement causes the Modify 
program to be loaded from the operating system 
library into central memory and to be executed. 
Parameters specify options and files. 



Option 



Significance 



MODIFY (p r p 2 . 



■Pn> 



The optional parameters, p^, may be in any order 
within the parentheses. Generally, a parameter 
can be omitted or can be in one of the following 
forms. 

option 

option= value 
option=0 

where option is one or two characters as defined in 
the following text. Unless Q or X is selected, 
parameters CB, CG, CL, or CS are meaningless. 
Value is a 1- to 7 -character name of a file or is a 
character string. 



CL - COMPASS list output including ^comment lines. 
Q or X option only. 

CL List output on OUTPUT file 

(L=OUTPUT). 
CL=filename List output on named file (L= 

filename), 
omitted or Short list instead of full list is 

CL=0 generated on OUTPUT file 

(L=0). 

CS - COMPASS systems text; Q or X option only. 

omitted or CS Systems text on SYSTEXT over- 
lay (S=SYSTEXT) 

CS=filename Systems text on named file 
(S=filename) 

CS=0 No systems text (S=0) 

CV - Character set conversion 

No conversion takes place. 



Option 



Significance 



Compressed compile file 

omitted Compile file is not in com- 

pressed format. 
Compile file is in compressed 
format. 



omitted or 

CV=0 

CV=63 



CV=64 



Convert library created using 

64-character set to 63-character 

set. 

Convert .library created using 

63-character set to 64-character 

set. 



A 



NOTE 



C - Compile file output 

omitted or C Compile output to be written 

on file COMPILE. 

C=filename Write compile output on 

named file. 

C=0 No compile output. 

CB - COMPASS binary; Q or X option only. 

omitted or CB COMPASS binary output 

written on the load -and -go 

file (B=LGO). 
CB=filename COMPASS binary output 

written on the named file 

(B=filename). 
CB=0 No binary output (B=0). 

CG - COMPASS get text option; Q or X option only. 
Takes precedence over CS. 

CG Load systems text from 

SYSTEXT (G = SYSTEXT). 

CG=filename Load systems text from 

named file (G=filename). 

CG = SYSTEXT not defined (G=0). 

omitted Load systems text from over- 

lay named in CS option. 



When the CV=63 or CV=64 conversion 
option is selected, Modify forces C=0 
(no compile file generation). 



Conversion is recommended if the character set 
of the old program library is not the same as the 
character set used when the program library is 
modified. Use CATALOG to determine the 
character set of the program library (refer to 
volume 1 of the NOS Reference Manual). Check 
with a systems analyst to determine the character 
set in use at the site. 



D - Debug 
omitted 

D 



Full edit 
omitted 



A directive or fatal error aborts 
the job. 

A directive error does not abort 
the job; the D option does not 
affect fatal error processing. 



Decks to be edited are determined 
by the U parameter or by EDIT 
directives. 

All decks on the library are to 
be edited and written on new 
program library, compile file, 
and source file if the respective 
options are selected. 



60450100 C 



8-1 



Option 



Significance 



Option 



Significance 



I - Directive input 

omitted or I 
I=filename 

1=0 

L - List output 
omitted or L 

L=filename 



L=0 

LO - List options 
omitted or LO 



LO=CjC„. 



I 



Directives on job INPUT file. 
Directives comprise next 
record on named file. 
No directive input. 



List output is written on job 
OUTPUT file. This file is 
automatically printed. 
List output is written on the 
named file. It is the user's 
responsibility to assure that 
the file is saved at job end 
or is printed. 

Modify does not generate a 
list output file. 



List options E, C, T, M, W, 
D, and S are selected. 
Each character (cj) selects an 
option to a maximum of seven 
options. The characters mus1 
not be separated. 



NR - No rewind of compile file 

omitted Compile file is rewound at be- 

ginning and end of Modify run. 

NR Compile file is not rewound at 

beginning and end of Modify 

run. 

P - Program library input 

omitted or P Program library on file OPL. 
P=filename Program library on named file. 

P=0 No program library input file. 

Q - Execute named program; no rewind of directives 
file or list output file. 



omitted or Q=0 



Q= program 



Q 



Option 


Significance 




A 


List active lines in 
deck 




C 


List directives other 
than INSERT, DE- 
LETE, RESTORE, 
MODNAME, I, or D 




D 


List deck status 




E 


List errors 




I 


List inactive lines 
in deck 




M 


List modifications 
performed 




S 


Include statistics on 
listing 


S - Source output: 


T 


List text input 


S 


W 


List compile file 






directives 


S=filename 



Example: LO=ADEMS 



N - New program library output 



N 



N=filename 



omitted or 
N=0 



New program library to be 

written on file NPL. 

New program library to be 

written on named file. It is 

the user's responsibility to 

assure that the file is saved 

at job end. 

Modify does not generate a 

new program library. 



omitted or S=0 

U - Update edit 
omitted 

U 



Assembler or compiler is NOT 
automatically called at end of 
the Modify run. 
At the beginning of the Modify 
run, Modify sets LO=E and sets 
the A parameter. At the end of 
the run, Modify calls the as- 
sembler or compiler specified 
by program. 

At the beginning of the Modify 
run, Modify sets LO=E and sets 
the A parameter. At the end of 
the run, Modify calls the COM- 
PASS assembler. When this 
option is selected, the CB, CL, 
CS, and CG parameters are 
meaningful. Compiler input is 
assumed to be COMPILE. All 
other parameters are set by de- 
fault. If CL is not specified 
with Q, lines beginning with an 
asterisk in column 1 are not 
written to the compile file (com- 
pile file directives are processed, 
however). 



illegal when A, Q, or X are selected. 

Source output written on file 
SOURCE. 

Source output written on named 
file. It is the user's responsi- 
bility to assure that the file is 
saved at job end. 

Modify does not generate a source 
output file. 



NOTE | 



If a new program library is being genera- 
ted, an EVICT is performed upon it (NPL 
or filename) before it is written on (refer 
to the NOS Reference Manual, volume 1, 
for a description of EVICT). 



Decks to be edited are determined 
by EDIT directives or by the F 
parameter. 

Only decks for which directives 
file contains DECK directives 
are edited and written on the 
compile file, new program li- 
brary, and source file if the 
respective options are on. F, if 
specified, takes precedence. 



X - Execute named program; directives file and list 
output file rewound. 

Same as Q option, except Modify 
directives input (I parameter) and 
list output (L parameter) files are 
rewound before processing. 
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Option 



Significance 



Control statement input 

omitted The control statement does 

not contain the input direc- 
tives. 

Z The Modify control statement 

contains the input directives 
following the terminator; the 
input file is not read. This 
eliminates the need to use a 



Option Significance 

separate input file for the di- 
rectives when only a few 
directives are needed. The 
first character following the 
control statement terminator 
is the separator character. 

Example: MODIFY(Z)/*EDIT, 
DECK1/*EDIT, DECK2 
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MODIFY FILE FORMATS 



Types of Modify files significant to Modify execu- 
tion include: 

• Source files 

• Program library files 

• Directives file 

• Compile file 



When U is selected, the source file- contains only 
those decks named on DECK directives; that is, only 
the decks updated during the current Modify run. 

When neither F nor U is selected, the source file 
contains only those decks explicitly requested on 
EDIT directives. 



SOURCE DECKS AND FILES 

A source file is a collection of information either 
prepared by the user or generated by Modify. 



SOURCE DECKS PREPARED BY USER AS 
TO MODIFY 



INPUT 



A user prepares a source deck for input to Modify 
by placing a deck name and optionally a COMMON 
statement in front of the source language deck 
(figure 3-1). At the same time, the user also in- 
serts compile file directives, as required, into the 
source language deck to control compile file output 
from Modify. Each source deck is terminated by 
an end-of-record. A group of decks is terminated 
by an end-of-file or end-of-information. The deck- 
name and COMMON statements are not placed on 
the program library. 

Modify source decks should not be confused with a 
compiler or assembler program. A Modify source 
deck can contain any number of FORTRAN programs, 
subroutines or functions; COMPASS assembler 
IDEN.T statements; or set of data. Typically, each 
Modify deck contains one program for the assembler 
or compiler or one set of data. 

SOURCE FILES GENERATED BY MODIFY 

The source file generated as output by Modify 
contains a copy of all active lines within decks 
written on the compile file and new program library. 
The source file is optional output from Modify and 
is controlled through use of the S option on the 
Modify control statement. Once generated, the 
source file can be used as source input on a sub- 
sequent Modify run. The file is a coded file that 
contains 80-column images. Any sequencing infor- 
mation beyond the 80th column is truncated. When 
F is selected on the Modify control statement, the 
source file contains all lines needed to recreate the 
latest copy of the program library. 



PROGRAM LIBRARY FILES 

Program library files (figure 9-1) provide the pri- 
mary form of input to Modify. When a program 
library file is input, it is an old program library 
and has a default name of OPL. When it is output, 
it is a new program library and has a default name 
of NPL. 



H 



prefix table i 



modification tablei 



End-of-record I 



prefix table 2 



modification table; 



text 2 



End-of-record? 



prefix table? 



End-of-recordn 



prefix table n 



modification table n 



End-of-recordn 



prefix tabie n+ | 



directory table 



directory 



Deck (record) 



Deck (record) 2 



J 



Deck (record) n 



End-of-record n + | 
End-of-information 
Figure 9-1. Library File Format 
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Before writing the new program library, an EVICT 
is performed on the file. Refer to the NOS Reference 
Manual, volume 1, for a description of the EVICT 
operation. 

A program library consists of a record for each 
deck on the library. The last deck record is followed 
by a record containing the library directory. The 
contents of the new program library is determined 
by EDIT directives and the control statement options. 
Only edited decks are written on the new program 
library. 



Modification Table Format: 



t-i 

i 



modnome2 



DECK RECORDS 

Each deck record consists of a prefix table, a 
modification table, and text. 



Prefix Table Format: 



Word Bits Field 





59 




47 




35 


17 


II 





WordO 




7700 


| 


16 


1 









1 








dtcknamt 


1 


rtstrvsd 




2 


crtation daft 


3 


lost modification dots 


• 
• 
• 










zeros 








I6 g 


chor set 





Word Bits Field 



ID 



16* 



59-48 Table 
type 

47-36 wc 
35-00 none 

59-18 deckname 



17-00 none 



59-00 creation 
date 



59-00 latest 

modifica- 
tion 
date 



11-00 char set 



Description 

Identifies table as pre- 
fix table. 

Word count; length of 
table is 16g words. 

Reserved for future 
system use. 

Name of deck obtained 
for source deck identi- 
fication line; 1 to 7 
characters. 

Reserved for future 
system use. 

Date that deck was 
created. 

Format of date is: 

yy/mm/dd. 

Date of most recent 
entry in modification 
table. Format of the 
date is the same as for 
creation date. 

Identifies character set 
used to create this deck. 



0000 
0064 



8 



6 3 -character 
set 

64 -character 

set 



ID 



59-48 



Table 
type 



Description 

Identifies table as modifi- 
cation table. The least 
significant digit indicates 
whether the deck is com- 
mon or not as follows: 



Deck is not common 
Deck is common 



47-12 none 
11-00 l 

wordj 59-18 modnamej 



16 



n 



Reserved for future sys- 
tem use. 

Number of modification 
names in table. 

1- to 7-character modifi- 
cation set name. Each 
modification to a deck 
causes a new entry in 
this table. 

YANK flag 

Modifier not yanked 

1 Modifier yanked 



Text Format: 

Text is an indefinite number of words that contain a 
modification history and the compressed image of 
each line in the deck. Text for each line is in the 
following format. 



59 


53 




35 


17 







a! wc 


seq. no. 


mhb) 


mhb 2 


m 


mhb 3 


mhb4 


mhb»5 


V 


compressed text 



Bits Field 



59 



58-54 wc 



53-36 seq. no. 



Description 

Activity bit: 

Line is inactive 

1 Line is active 

Number of words of com- 
pressed text. 

Sequence number of line 
(octal) according to position 
in deck or modification set. 
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BLts 



Field 



35-18 


mhb. 


and 




subse- 




quent 




18 -bit 




bytes 





Description 

Modification history byte. 
Modify creates a byte for each 
modification set that changes 
the status of the line. Modifi- 
cation history bytes continue 
to a zero byte. Since this 
zero byte could be the first 
byte of a word and the com- 
pressed line image begins a 
new word, the modification 
history portion of the text 
could terminate with a zero 
word. The format of mhbi 
is: 



Prefix Table Format: 





59 




47 


35 




17 







WordO 




7700 


1 


'• 1 











1 








name 




1 


reserved 




2 


dote 


3 
• 
• 

I6 8 


zeros 



BE 



name A Modify -generated directory has 
the name OPL. However, if the 
name of the directory is changed 
(by LIBEDIT, for example), that 
name is retained on new program 
libraries then generated. 



a Activate bit 

Modification set 
deactivated the 
line 

1 Modification set 
activated the line 

mod. Index to the entry in 

no. the modification table 

that contains the 
name of the modifi- 
cation set that chang- 
es the line status. 
A modification number 
of zero indicates the 
deck name. 

com- The compressed image of the 

pressed line is display code. One or 

text two spaces are each repre- 

sented by 55g; they are not 
compressed. Three or more 
embedded spaces are replaced 
in the image as follows: 

3 spaces replaced by 0002 

4 spaces replaced by 0003 



64 spaces replaced by 0077s 

65 spaces replaced by 
007755 8 

66 spaces replaced by 
00770001 8 

67 spaces replaced by 
00770002s, etc. 

Trailing spaces are not con- 
sidered as embedded and are 
not included in the line image. 
On a 64 -character set program 
library or compressed compile 
file, a 00 character (colon) is 
represented as a 0001 byte. A 
12 -bit zero byte marks the end 
of the line. 



DIRECTORY RECORD 

The library file directory contains a prefix table 
followed by a table containing a two-word entry for 
each deck in the library. Directory entries are 
in the same sequence as the decks on the library. 



Directory Table Format: 





59 




47 






29 




7 





ID Word 




7000 


1 











t 


1 


decknamej 


typei 


2 













| 


random address | 




3 










deckname2 




| iype2 




4 













I 


random addressg 




*A* 










« 
• 
• 






;-i 










deckname f /£ 




1 <»P'*/2 




i 













1 


rondom address f /g 





Word 



ID 



1,3, 



Bits 



Field 



Description 



59-48 Table type Identifies table as pro- 
gram library directory. 



17-00 



Directory length ex- 
cluding ID word. 



59-18 deckname. Name of program library 
deck; 1 to 7 characters 
left -justified. 



17-00 



type- Type of record. 

6 Old program li- 
brary deck (OPL) 

7 Old program li- 
brary common 
deck (OPLC) 

10 Old program li- 
brary directory 
(OPLD) 



| NOTJ~l 

Other record types are defined but are 
ignored by Modify (refer to the NOS 
Reference Manual, volume 1, for a com- 
plete description of record types). 



2,4, 



.,1 



29-00 random 
address. 



Address of deck rela- 
tive to beginning of file. 
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DIRECTIVES FILE 



Compressed Compile File (A-Mode) Format: 



The directives file contains the Modify directives 
record. This record consists of initialization, file 
manipulation, and modification directives, and any 
source lines (including compile directives) to be 
inserted into the program library decks. An option 
on the Modify control statement designates the file 
from which Modify reads directives. Normally, 
the directives file is the job INPUT file. READ and 
READ PL directives cause Modify to stop reading 
directives from the directives file named on the 
Modify statement and to begin reading from some 
other file containing directives or insertion lines. 



COMPILE FILE 

The compile file is the primary form of output for 
Modify. It can be suppressed by the user as a 
Modify control statement option, when no compila- 
tion or assembly follows the modification. 



If a compile file is specified on the Modify control 
statement, Modify writes the edited programs on it 
in a format acceptable as source input to an assem- 
bler, compiler, or other data processor. Through 
control statement parameters and directives, a 
user can specify whether the text on the file is to 
be compressed or expanded, sequenced or unse- 
quenced. If the text is expanded, the user can also 
specify the width of each line of text preceding the 
sequence information. 



Expanded compile file format for each line consists 
of x columns of the expanded line (where x is the 
width requested), followed by 14 columns of se- 
quence information, if sequencing information is 
requested, and terminated by a zero byte. An 
end-of-record terminates the decks written on the 
compile file. 





59 




47 




35 


17 


ii 







ID Word 




7700 


1 


0016 


char Ml 


1 









1 










mod nam tj 




1 


•tq. no. | 




2 


comprotstd line ( 


*T% 








• 
• 
• 




















modnamt n 




1 


seq. no.„ 






comprtsstd Hn* n 



char set 



seq. no. 



compressed 
line 



Character set of record. 
00008 signifies 63-character 
set. 0064s signifies 64-char- 
acter set. 

Sequence number of the line 
relative to the modification 
set identified by modname. 

A line in compressed form. 
Refer to the compressed text 
description for text formats 
of deck records. 



SCRATCH FILES 

Modify uses scratch files in three situations. 

Scratch File 1 Used when common decks are 
(SCR1) modified and no new program 

library is requested. 

Scratch File 2 Used when insertions overflow 
(SCR 2) memory. 

Scratch File 3 Used when a CREATE or 
(SCR3) COPYPL directive is processed. 

This file is in program library 

format. 

These files are returned by Modify at the end of the 
Modify run. 
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10 



CREATE PROGRAM LIBRARY 

EXAMPLE 1 

This example illustrates how Modify can be used to construct a file in program library format from 
source decks. This example contains only one source deck (PROG) consisting of a FORTRAN pro- 
gram. The deck is terminated by an end-of-file card. The next record on INPUT contains the 
directives. It is the user's responsibility to save the newly created program library (TAPE) for use 
in future Modify runs. 

Unless C=0 is specified, a compile file is generated. This example shows the compile file (COMPILE) 
being used as input to the compiler. The compiler places the compiled program on LGO; the LGO 
card calls for loading and execution of the compiled program. 

COPYBF(INPUT, SOURCE) 
MODIFY(P=0, N=TAPE, F) 
FTN(I= COMPILE) 



LGO. 
7/8/9 
PROG 



File related cards 



(SOURCE DECK) 



6/7/9 
*REWIND 
*CREATE 
6/7/8/9 



SOURCE 
SOURCE ' 



-Directives Input 



EXAMPLE 2 

This example illustrates creation of a library from source decks on a source file other than INPUT. 
After the library has been created, it can be modified, edited, and written on a compile file for use 
by an assembler or compiler. 



Contents of File SALLY: 

TOM 
COMMON 



(SOURCE DECK FOR TOM) 



7/8/9 
JACK 
COMMON 



(SOURCE DECK FOR JACK) 



Job Deck: 
(JOB CARD) 



File related 
cards 



MODIFY(N, F, P=0) 



7/8/9 

*REWIND SALLY 

*CREATE SALLY 



*DEFINE REQ 



Directives Input 



7/8/9 



7/8/9 
RON 



(SOURCE DECK FOR RON) 



*CALL TOM 
*IFCALL REQ, JACK 
6/7/8/9 
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MODIFY PROGRAM LIBRARY 

EXAMPLE 1 

In this example. Modify uses all default parameters. The sequencing information shown for inserted 
cards is assigned during modification. 




File related cards 



7/8/9 

*IDENT MOD 10 

*DECK BOTTLE 

*/ *****MODIFICATIONS 

*D 10 

*D 4 

(CARD TO BE INSERTED IS ASSIGNED MOD10. 1) 

*D 20, 22 

(CARDS TO BE INSERTED ARE ASSIGNED MOD10.2 THROUGH MOD10.4) 

I MOD9. 30 

(CARD TO BE INSERTED IS ASSIGNED MOD10. 5) 

*EDIT BOTTLE 

6/7/8/9 



Modification 
set MOD10 



EXAMPLE 2 

This job modifies deck EDNA for replacement on the program library. No compile file is produced. 



MODIFY(N, C=0) 



rFile related cards 



7/8/9 

*IDENT A2 

*DECK EDNA 

*MODNAME Al 

*/ *****MODIFICATIONS 

*D 30 

TAG RJ 

*MODNAME EDNA 
*I 7011 

ERR SA1 

ZR 

PRINT 

EQ 
*D 7644, 7650 
*EDIT EDNA 

6/7/8/9 



CHECK 



LIST1 

XI, ABORT 

(0*** ERROR 131 

ABORT 






Modification set A2 



Delete card Al. 30 
Insert card A2. 1 



Insert cards A2. 2 through A2. 5 
after EDNA. 7011 



Delete cards EDNA. 7644 through 
EDNA. 7650 
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MOVE TEXT 

EXAMPLE 1 

The job illustrated below calls Modify twice. On the first call. Modify deactivates all but cards 32 
through 54 and writes the source for these cards on source file FRANK. On the second call, Modify 
deletes the remainder of the cards and reinserts the saved cards at the beginning of KEN. 



MODIFY (S= FRANK, C=0) 
MODIFY(N, C=CAL) 



: File related cards 



7/8/9 

i'lDENT MOV1 

*DECK KEN 

*D 1,31 

*D 55,63 

*EDIT KEN 

7/8/9 

*IDENT MOV2 

*REWIND FRANK 

*DECK KEN 

*D 32,54 

*I 

*READ FRANK, KEN 

*EDIT KEN 

3/7/8/9 



Modification set MOV1 

Delete cards before card KEN. 32 
Delete cards KEN. 55 through KEN. 63 
Transfer remaining cards (KEN. 32 through 

KEN. 54) to source file FRANK 
Modification set MOV2 



Delete remainder of cards in KEN 
Insert cards at beginning of KEN 
Read insertion text from deck KEN on file 
FRANK 



EXAMPLE 2 

This job moves text cards from one deck to another. On the first call to Modify, cards 32 through 
54 of deck KEN on file OPL are saved on source file FRANK. On the second call, the saved cards 
are inserted into deck WILL. 



MODIFY(S= FRANK, C=0) 
MODIFY(N, C=MEL) 



:File related cards 



7/8/9 




*IDENT 


Fl 


*DECK 


KEN 


*D 


1.31 


*D 


55, 63 


*EDIT 


KEN 


7/8/9 




*REWIND FRANK 


*IDENT 


F2 


*DECK 


WILL 


*I 


25 


*READ 


FRANK, KEN 


*EDIT 


WILL 


6/7/8/9 





Modification set Fl 

Delete cards KEN. 1 through KEN. 31 
Save cards KEN. 32 through KEN. 54 on source 
file FRANK 



Insert text after card WILL. 25 

Insertion text taken from deck KEN on file FRANK 

Deck WILL is written on NPL and compile file MEL 
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READ DIRECTIVES FROM AN ALTERNATE FILE 

This job illustrates how the READ directive can be used to change the source of directives and correction 
text from the primary input file (in this case INPUT) to some other file. 



:«- 



-File related cards 




MODIFY. 

COMPASS(I=COMPILE) 

LGO. 

7/8/9 

*IDENT JAN 

*READ DIR- 

*DECK C 



7/8/9 



6/7/8/9 



Read, contents of DIR 
*DECK A 



*DECK B 



6/7/8/9 



Corrections for A 



Corrections for B 



Return to INPUT file 



YANK AND UNYANK MODIFICATION SETS 

This example illustrates a job that logically removes all of the modification sets applied to program 
library LIB from the modification set named JULY and on. The change is not incorporated into the 
library; it is for the benefit of this run only. 



-File related cards 



MODIFY (P=LIB, F) 

COMPASS(I=COMPILE) 

LGO. 

7/8/9 

*IDENT NEGATE 

*DECK MASTER 

*YANK JULY, * 

6/7/8/9 



To incorporate the preceding change on a new program library, add the N parameter to the Modify 
statement. 

The effects of a YANK can be nullified in future runs and, consequently, the effects of the yanked 
modification sets can be restored through the UNYANK directive. Such a modification might appear 
as follows: 



*IDENT RESTORE 
*DECK MASTER 
*UNYANK JULY, * 
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PURGE DECKS 

Decks BAD, WORSE, and WORST are no longer needed. The following job removes them from the library. 
They could also be removed through a selective edit using EDIT directives. In either case, the removal is 
permanent. 




MODIFY (N, C=0, F) 



— File related cards 



7/8/9 

*PURDECK 

6/7/8/9 



BAD, WORSE, WORST 



CHANGE THE DIRECTIVES PREFIX CHARACTER 

EXAMPLE 1 

This example illustrates how to maintain directives input on a library. Because * is the prefix used 
on the library, a different prefix is required when modifying the library. In this case, / becomes the 
prefix character. 

ATTACH(OPL) 

GET(FIX) 

MODIFY(P=FIX, C=Z, N=FIX2) 

REWIND(Z) 

COPYSBF(Z, OUTPUT) 

REWIND(Z) 

MODIFY(I=Z) 

COMPASS(I, S, B=LT01) 



7/8/9 






*PREFIX 


/ 




/WIDTH 


58 




/IDENT 


Fl 




/DECK 


CORR 




/I 


873 




*I 


1007 






LDC 


7777B 




STM 


STMA+1 


/D 


880 




/EDIT 


CORR 




6/7/8/9 







The contents of deck CORR on compile file Z are as follows: 



: IDENT 

DECK 

: I 


NIX 

GRM1TD 
MHD2. 19 




CORR 
CORR 
CORR 


1 

2 
3 




<D 

=1 


997, 1000 
1007 
LDC 

STM 


7777B 
STMA+1 


CORR 
Fl 
Fl 
Fl 


873 
1 
2 
3 


\ Inserted cards 


*D 


LJM 
980,984 


STM 


CORR 
CORR 


879 
881 


Instructioi 
has been d 



After file Z is produced, the deck GRM1TD is modified by the contents of Z. The resulting compile 
file (COMPILE) contains COMPASS language PPU code and is assembled using COMPASS. 
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The job produces a new program library (FIX2) which replaces FIX so that the changes to deck 
CORR are saved. 

The resulting COMPASS listing would appear as follows: 

Corrections Contents of 

on File Z COMPILE 

: (Correction IDs) (Deck IDs) 

STD SM GRM1TD 1007 

LOC 7777B Fl 2 NIX 11 

STM STMA+1 Fl 3 NIX 12 



Since the comments go through the correction identification, the INWIDTH directive must be deleted 
if a new program library is generated. However, for maintenance, there is an advantage of seeing 
the correction identifiers with the deck identifiers. 

EXAMPLE 2 

This example illitstrates changing the compile file prefix character so that when Modify produces the 
compile file, it recognizes Only directives using the specified prefix. The directives prefix, in this 
case, is unaltered. 



ATTACH(OPL) 

MODIFY. 

COMPASS(LS.B) 

7/8/9 

*IDENT TEST1 

*DECK TEST 

*PREFIXC / 

*EDIT TEST 

6/7/8/9 



Deck TEST contains the following: 



LDM TCLT 
STD CM 

*CALL PPC 
/CALL PPCA 

Modify ignores the common deck call to PPC. COMPASS interprets it as a comment card. Modify 
acts on the common deck call to PPCA and replaces the /CALL directive with a copy of common 
deck PPCA. 
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USE OF THE Z PARAMETER 

EXAMPLE 1 

Suppose you want to create a compile file using an alternate OPL. The following deck illustrates 
this technique. 



MODlFY(Z)/*OPt;FILE, OPLZ/*EDIT, DECK1 
6/7/8/9 

EXAMPLE 2 

Another use of Z might be to request editing of specific decks; 



MODIFY(Z)/*EDIT. DECK1, DECK2 
6/7/8/9 
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SAMPLE FORTRAN PROGRAM 

This set of Modify examples illustrates how Modify can be used for maintaining a FORTRAN Extended program 
in program library format. The FORTRAN program calculates the area of a triangle from the base and height 
read from the words in the data record. 

EXAMPLE 1 

The following job places the FORTRAN program and subroutine as a single deck (ONE) on the new 
program library (NPL) and on the compile file (COMPILE). Following Modify execution, FORTRAN 
is called to compile the program. The LGO card calls for execution of the compiled program. This 
program does not execute because of an error in the SUBROUTINE statement. The name of the 
subroutine should be MSG, not MSA. 



COPYBFUNPUT, S) 
MODIFY(P=0,N, F) 
FTN(I=COMPILE) 
LGO. 



;File related cards 



7/8/9 
ONE*- 



END OF RECORD 



-Deck name 



PROGRAM ONE (INPUT, OUTPUT, TAPED 

PRINT 5 
5 FORMAT (1H1) 

10 READ 100, BASE, HEIGHT, I 

100 FORMAT(2F10. 2, II) 

IF (I.GT.0) GO TO 120 

IF (BASE.LE.0) GO TO 105 

IF (HEIGHT. LE. 0) GO TO 105 

GO TO 106 

105 CALL MSG 

106 AREA = .5*BASE*HEIGHT 
PRINT 110, BASE, HEIGHT, AREA 

110 FORMAT(///,* BASE=*F20. 5, * HEIGHT= 
IF18.5, /, * AREA = *F20. 5) 

WRITE (1) AREA 

GO TO 10 
120 STOP 

END 

SUBROUTINE MSA- 

PRINT 400 
400 FORMAT <///, * FOLLOWING INPUT DATA NEGATIVE OR ZERO *) 

RETURN 

END 

6/7/9 END OF FILE< End of source deck 

^REWIND S 

*CREATE S 

7/8/9 END OF RECORD 



{Should be 
SUBROUTINE MSG 



Directives input 



200.24 
300. 24 
400.00 
326.32 
500. 00 
000.00 
700.43 
100.00 
050.00 
150.00 



500. 76 
600.76 
700. 00 
425.36 
600. 00 
150.00 
800.00 
300. 00 
100.00 
200.00 



Data record 



6/7/8/9 END OF INFORMATION 
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EXAMPLE 2 

Examination of Modify output from the creation job reveals that the erroneous SUBROUTINE state- 
ment has card identifier ONE. 20. The following job corrects the error and generates a new program 
library. 



MODIFY(N, 


F) 






FTN(I= COMPILE) 






LGO. 








7/8/9 


END OF RECORD 




*IDENT 


MODI 






*DECK 


ONE 






*DELETE 


20 






CTjpnATTrrnvTT? i\yro*"i - 


Id 


our 
7/8/9 








200. 24 




500.76 




300. 24 




600. 76 




400.00 




700. 00 




326.32 




425.36 




500.00 
000.00 




600.00 
150.00 


Data record 


700.43 




800.00 




100.00 




300.00 




050.00 




100.00 




150.00 




200.00 





Identified as MODI. 1 on NPL 



6/7/8/9 END OF INFORMATION 
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EXAMPLE 3 

This job uses the same input as the first job biit divides the program into two decks: ONE and MSG. 
Deck MSG is a common deck. A CALL MSG directive is inserted into deck ONE to ensure that MSG 
is written on the compile file whenever deck ONE is edited. 



COPYBF<INPUT, S) 
MODIFY(P=0, N, F) 
FTN(I=COMPILE) 
LGO. 



File related cards 



7/8/9 END OF RECORD 

MSG 

COMMON 

SUBROUTINE MSG 

PRINT 400 
400 FORMAT (///, * FOLLOWING INPUT DATA NEGATIVE OR ZERO *) 

RETURN 

END 
7/8/9 END OF RECORD 

ONE 

PROGRAM ONE (INPUT, OUTPUT, TAPED 

PRINT 5 
5 FORMAT (1H1) 

10 READ 100, BASE, HEIGHT, I 

100 FORMAT(2F10. 2, II) 

IF (I.GT.0) GO TO 120 

IF (BASE.LE. 0) GO TO 105 

IF (HEIGHT. LE.0) GO TO 105 

GO TO 106 

105 CALL MSG 

106 AREA = . 5*BASE*HEIGHT 
PRINT 110, BASE, HEIGHT, AREA 

110 FORMAT (///,* BASE=*F20„5, * HEIGHT** 
IF18.5, /,* AREA=*F20. 5) 

WRITE (1) AREA 

GO TO 10 
120 STOP 

END 
*CALL MSG < . Replaced by common deck MSG 



6/7/9 END OF FILE 

-REWIND S 

*CREATE S 

7/8/9 END OF RECORD 



on compile file 



200.24 


500. 76 


300.24 


600. 76 


400. 00 


700.00 


326.32 


425. 36 


500.00 


600.00 


000, 00 


150.00 


700.43 


800. 00 


100. 00 


300.00 


050. 00 


100.00 


150.00 


200. 00 



Data record 



6/7/8/9 END OF INFORMATION 



10-10 
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EXAMPLE 4 

This example adds a deck to the library created in the previous example. With no new program 
library generated (N is omitted from Modify card), the addition is temporary. 



COPYBF(INPUT, S) 
MODIFY. 
FTN(I=COMPILE) 
LGO. 



: File related cards 



7/8/9 
TWO 



END OF RECORD 
PROGRAM TWO(INPUT, OUTPUT) 



END 

*CALL MSG < — 

6/7/9 

*REWIND S 

^CREATE S 

*IDENT MOD2 

*DECK MSG 

*DELETE MSG.3 

400 FORMAT (///, : 

*EDIT TWO 

7/8/9 

(DATA RECORD) 

6/7/8/9 



Replaced by common deck MSG on 
compile file 



FOLLOWING INPUT DATA POSITIVE *) 
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STANDARD CHARACTER SET 



CDC 
SRAPHIC 


ASCII 
GRAPHIC 
SUBSET 


DISPLAY 
CODE 


HOLLERITH 
PUNCH 
(026) 


EXTERNAL 
BCD 
CODE 


ASCII 
PUNCH 
(029) 


ASCII 
CODE 


CDC 
GRAPHIC 


ASCII 
GRAPHIC 
SUBSET 


DISPLAY 
CODE 


HOLLERITH 
PUNCH 
(026) 


EXTERNAL 
BCD 
CODE 


ASCII 
PUNCH 
(029) 


ASCII 
CODE 


:t 


* 


oot 


8-2 


00 


8-2 


3A 


6 


6 


41 


6 


06 


6 


36 


A 


A 


01 


12-1 


6 1 


12-1 


41 


7 


7 


42 


7 


07 


7 


37 


B 


B 


02 


12-2 


62 


12-2 


42 


8 


8 


43 


8 


10 


8 


38 


C 


C 


03 


12-3 


63 


12-3 


43 


9 


9 


44 


9 


1 1 


9 


39 


D 


D 


04 


12-4 


64 


12-4 


44 


+ 


+ 


45 


12 


60 


12-8-6 


2B 


E 


E 


05 


12-5 


65 


12-5 


45 


- 


- 


46 


1 1 


40 


1 1 


2D 


F 


F 


06 


12-6 


66 


12-6 


46 


* 


K 


47 


1 1-8-4 


54 


11-8-4 


2A 


G 


G 


07 


12-7 


67 


12-7 


47 


/ 


1 


50 


0-1 


21 


0-1 


2F 


H 


H 


1 


12-6 


70 


12-8 


48 


( 


( 


5 1 


0-8-4 


34 


12-8-5 


28 


1 


1 


1 1 


12-9 


7 1 


12-9 


49 


) 


) 


52 


12-8-4 


74 


11-8-5 


29 


J 


J 


12 


ll-l 


41 


ll-l 


4A 


$ 


$ 


53 


1 1-8-3 


53 


1 1-8-3 


24 


K 


K 


13 


11-2 


42 


11-2 


4B 


= 


- 


54 


8-3 


13 


8-6 


3D 


L 


L 


14 


1 1-3 


43 


11-3 


4C 


BLANK 


BLANK 


55 


NO PUNCH 


20 


NO PUNCH 


20 


M 


M 


15 


11-4 


44 


11-4 


40 


.(COMMA) 


.(COMMA) 


56 


0-8-3 


33 


0-8-3 


2C 


N 


N 


16 


1 1-5 


45 


11-5 


4E 


.(PERIOD) 


.(PERIOD) 


5 7 


12-8-3 


73 


12-8-3 


2E 








17 


1 1-6 


46 


11-6 


4F 


= 


# 


60 


0-8-6 


36 


8-3 


23 


P 


P 


20 


1 1-7 


47 


11-7 


50 


c 


C 


61 


8-7 


17 


12-8-2 


5B 


Q 


Q 


21 


11-8 


50 


11-8 


51 


] 


] 


62 


0-8-2 


32 


11-8-2 


5D 


R 


R 


22 


11-9 


51 


11-9 


52 


%tt 


% 


63 


8-6 


16 


0-8-4 


25 


S 


S 


23 


0-2 


22 


0-2 


53 


* 


" (QUOTE) 


64 


8-4 


14 


8-7 


22 


T 


- T 


24 


0-3 


23 


0-3 


54 


— 


_ (UNDERLINE) 


65 


0-8-5 


35 


0-8-5 


5F 


U 


U 


2 5 


0-4 


24 


0-4 


55 


V 


! 


66 


1 1-0 


52 


12-8-7 


21 


V 


V 


26 


0-5 


25 


0-5 


56 
















w 


w 


27 


0-6 


26 


0-6 


57 


A 


a 


67 


0-8-7 


37 


12 


26 


X 


X 


30 


0-7 


2 7 


0-7 


58 


t 


'(APOSTROPHE) 


70 


1 1-8-5 


55 


8-5 


27 


Y 


Y 


31 


0-8 


30 


0-8 


59 


I 


? 


71 


1 1-8-6 


56 


0-8-7 


3F 


z 


z 


32 


0-9 


31 


0-9 


5A 


< 


< 


72 


12-0 


72 


12-8-4 


3C 








33 





12 





30 
















1 


1 


34 


1 


01 


1 


31 


> 


> 


73 


1 1-8-7 


57 


0-8-6 


3E 


2 


2 


35 


2 


02 


2 


32 


< 


(a 


74 


8-5 


15 


8-4 


40 


3 


3 


36 


3 


03 


3 


33 


> 


\ 


75 


12-8-5 


75 


0-8-2 


5C 


4 


4 


37 


4 


04 


4 


34 


-> 


—(CIRCUMFLEX) 


76 


12-8-6 


76 


11-8-7 


5E 


S 


5 


40 


5 


05 


5 


35 


: (SEMICOLON) 


i (SEMICOLON) 


77 


12-8-7 


77 


1 1-8-6 


3B 



T TWELVE OR MORE ZERO BITS AT THE END OF A 60- BIT WORD ARE 
INTERPRETED AS END-OF-LINE MARK RATHER THAN TWO COLONS. 
END-OF-LINE MARK IS CONVERTED TO EXTERNAL BCD 1632. 

tt IN INSTALLATIONS USING THE CDC 63-GRAPHIC SET, DISPLAY CODE 00 HAS !I0 ASSOCIATED 
GRAPHIC OR HOLLERITH CODE; DISPLAY CODE 63 IS THE COLON (8-2 PUNCH). THE 
SELECTION OF THE 63- OR 64- CHARACTER SET FOR TAPES IS AN INSTALLATION OPTION. 
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OUTPUT LISTING AND MESSAGES 



B 



Depending on list options selected on the Modify 
control statement, list output for Modify contains 
the following. 

• Input directives 

• Status of each deck 

Modifiers are listed first, followed by a 
list of activated lines, deactivated lines, 
active lines, and inactive lines as they are 
encountered. To the left of each line are 
two flags, a status flag and an activity 
flag. The status flag can be I (inactive) or 
A (active). The activity flag can be D 
(deleted) or A (activated). Following 
these lines are the unprocessed modifica- 
tions and errors, if any. The last line 
contains a count of active lines, inactive 
lines, and inserted lines. 



Statistics 

This includes lists of the following. 

Decks on program library 
Common decks on program library 
Decks added by initialization directives 
Decks on new program library 
Decks written on compile file 

A replaced deck is enclosed by parentheses. 
Completing the statistics is a line contain- 
ing counts of the number of lines on the 
compile file and the amount of storage used 
during the Modify run. 

Errors 

Modify prints the line in error, if any, 
above the diagnostic message. Error 
messages other than those identified as 
fatal can be overridden through selection 
of the Modify statement D (debug) option. 
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OPLEDIT UTILITY 



OPLEDIT is an NOS utility used in conjunction with 
Modify-formatted old program libraries (OPLs). 
The OPLEDIT routine is used to completely remove 
specified modification decks and modification iden- 
tifiers from an OPL. It can also be used to extract 
the contents of specified modification sets on an 
OPL file. 

The following are the OPLEDIT directives. 

*EDIT Edit deck 

* PULLALL Generate modification set 

*PULLMOD Reconstruct modification set 

*PURGE Remove modification set 

The format of OPLEDIT directives is essentially 
the same for Modify directives (refer to section 2). 
The main difference is that OPLEDIT does not 
allow the user to change the prefix character. 
Therefore, the asterisk (*) must be used. 



EDIT - EDIT SPECIFIED DECKS 

The EDIT directive requests OPLEDIT to edit a 
program library deck and transfer it to the new 
program library. The deck names specified nor- 
mally are the decks that contain the modification 
identifiers. 



Format: 

*EDIT p 1# p 2 , . 



Pi 



• P 



A deck name or range of 
decknames in one of the 
following forms: 

deckname 

deckname a . deckname^ 

The first form edits a deck on 
the library; the second form 
requests a range of decks 
starting with deckname a and 
ending with decknameb. 

If the deck names are in the 
wrong sequence, OPLEDIT 
issues the error message: 

NAMES SEPARATED BY 
*. * IN WRONG ORDER. 

If OPLEDIT fails to find one 
of the decks, it issues the 
message: 

UNKNOWN DECK - deckname. 



PULLALL - GENERATE MODIFICATION 

St I 

The PULLALL directive allows the user to generate 
a modification set that contains the net effect of all 
current modification sets or all modification sets 
added after and including a specific modification set. 

Formats: 

*PULLALL 

*PULLALL modname 

modname First modset to be included; all 
modsets following modname are 
also included, provided modname 
appears in the edited deck. 

For the first format, OPLEDIT builds a directive file 
suitable for submission to Modify using the *READ 
Modify directive. The file (specified by the M param- 
eter on the OPLEDIT control statement) contains the 
net effect of all modifications currently applied to the 
program library. . As such, all Modify IDENT direc- 
tives are deleted and replaced by an IDENT ******* 
at the beginning of the file. 



PULLMOD - RECONSTRUCT 
MODIFICATION SET 

With the PULLMOD directive,: the user can reconstruct 
one or more modification sets applied to edited decks. 
The structure of the original modset is maintained; 
that is. Modify IDENT directives are not changed or 
deleted as in the PULLALL directive. 

Format: 

*PULLMOD modname. , modname„, . . . , modname 



modname. 



Modification name to be generated 
onto file specified by M param- 
eter on OPLEDIT control state- 
ment. 



PURGE - REMOVE MODIFICATION SET 



The PURGE directive enables the user to completely 
remove the effects of a previous modification set or 
group of modsets from decks written on the new pro- 
gram library. The modification identifiers are no 
longer maintained in the history bytes (refer to Text 
Format, section 9) of the new program library. 
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Formats: 



L=0 



List no output. 



SPURGE modname 
-PURGE modname, * 

modname Modification set to be removed. 

* Indicates that the modset and all 

subsequent modsets are to be re- 
moved, provided modname appears 
on the edited decks. 



Note that it is not possible to remove modsets implic- 
itly; that is, *PULLMOD A.B is illegal. Also, 
*PULLMOD A, * does not pull modset A and all 
modsets that follow (as on the *PURGE directive). 
Rather, it pulls modset A and modset *. 

Modification names requested are removed only 
from decks edited. Modsets generated by OPLEDIT 
are in a form suitable for use by Modify as follows: 

*READ,file, * 
*READ, file, ident 

That is, each modset is a separate record, with 
ident being the first line. The *PULLALL modset, 
if used, is the first record on the file. The file 
(specified by the M parameter) is returned before, 
and rewound after use. 



OPLEDIT CONTROL STATEMENT 

The control statement format is: 



M=lm 5 Write output from 

*PULLMOD and *PULLALL 
directives on file Ifng. If 
M is omitted, M=MODSETS 
is assumed. 



LO=x 



OPLEDIT(p 1 , p 2 , 



...P n ) 



F 
D 

U 

u=o 



Any of the following in any order: 

I Use directive input from 

file INPUT. If the I 
option is omitted, file 
INPUT is assumed. 



1 



I=lfn 

1=0 
P 



P=lfn„ 



P=0 



Use directive input from 
file lfn-p 

Use no directive input. 

Use file OPL for the old 
program library. If the 
P option is omitted, file 
OPL is assumed. 

Use file lfn 2 for the old 
program library. 

Use no old program 
library. 

Write new program 
library on file NPL. 

Write new program 
library on file lfr^. 

Write no new program 
library. If this option is 
omitted, N=0 is assumed. 

L List output on file 

OUTPUT. If the L option 
is omitted, file OUTPUT 
is assumed. 

L=lfn 4 List output on file lfn 4 . 



N 



N=lfiu 



N=0 



Set list options x; each bit 
in x, if set, turns on the 
corresponding option. 



001 


Errors 


002 


Directives 


004 


All other input 
statements 


010 


Modifications 
made 



020 Directives pro- 

cessed from the 
program library 

040 Deck status 

100 Directory lists 

200 Inactive statements 

400 Active statements 

If this option is omitted, 
x=177 is assumed (that is, 
the first seven options 
listed). 

Modify all decks. 

Debug; ignore errors. 

Generate *EDIT directives 
for all decks. 

Generate no *EDIT direc- 
tives. If the U option is 
omitted, generate *EDIT 
directives for common 
decks. 

The OPLEDIT control 
statement contains the in- 
put directives following 
the terminator; the input 
file is not read. This 
eliminates the need to use 
a separate input file for 
the directives when only a 
few directives are needed. 
The first character fol- 
lowing the control state- 
ment terminator is the 
separator character. If 
Z is omitted, the control 
statement does not contain 
the input directives. 



NOTE 



Do not place an- 
other terminator 
after the 
directives. 



OPLEDIT EXAMPLES 

Figure C-l illustrates the four OPLEDIT directives. 
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batch 
*RFL,0. 
/get,mainpl 
/catalog ,mainpl , r 

CATAL(X) OF MAINPL 
KEC NAME TYPE 


FILE 
LENGTH 


1 

CKSUM 


DATE 


1 
2 


DECK5 

DECK1 

M0D1 


OPLC (64) 
OPL (64) 
M0D4 


27 
61 


6354 
3171 


77/10/10. 
77/10/07. 


3 


DECK2 
M0D1 


OPL (64) 
M0D2 


60 
MOD3 


3077 
MOD4 


77/10/07. 


4 


DECK3 
M0D1 


OPL (64) 
M0D4 


37 


2333 


77/10^06. 


5 


DECK4 
M0D4 


OPL (64) 
M0D6 


53 


3057 


77/10/10. 


6 


OPL 


OPLD 


13 


1175 


77/10/10. 


7 


* EOF * 


SUM = 


315 







1 

CATALOG COMPLETE, 
/opledit , p=mainpl ,m=mods , lo= 1 ,n=newpl 
? * purge mod4,* 
? *Dullmod mod2,mod3 
? *pullall modi 
? *edit deck1.deck4 



OPLEDIT a)MPLETF.. 
/catalog , newpl , r 

CATALOG OF .NEWPL 
NAME 



FEC 
1 



DECK1 
M0D1 

DECK2 
M0D1 

DECK3 
MOD1 

DECK4 
OPL 



6 * EOF * 

CATALOG COMPLETE. 



TYPE 

OPL (64) 



OPL (64) 
M0D2 

OPL (64) 



OPL (64) 
OPLD 

SUM = 



FILE 
LENGTH 

37 
55 



MOD3 



34 



44 
11 

225 



1 
CKSUM 

7732 
3134 
3117 



0216 
2101 



DATE 
77/10/07. 

77/10/07. 

77/10/06. 

77/10/10. 



Figure C-l. OPLEDIT Examples (Sheet 1 of 2) 
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/copycr,mods 
******* 

******* 

DECK1 



•IDENT 
•DECK 

*D,1 
*** 

•1,2 
•1,3 



MAIN PROGRAM, DECK DECK1 . 

COMMON JOT 

CALL SUB3 

IF ( JOT .EO . 3 ) PRINT* , "TIME-SHARING JOB . 
IF ( JOT . NE . 3 ) PRINT* , "BATCH JOB . " 
DECK2 



SUBROUTINE 1, DECK DECK2. 

CALL SUBROUTINE SUB2 
IN DECK2. 

END DECK2. 
DECK3 



•DECK 

*I,0 

*WEOR 

*D,1 

*** 

•1,3 
* 

• 

•1,7 
*** 

•DECK 

•1,0 

*WFOR 

*D,1 

*•* SUBROUTINE 2, DECK DECK3. 

COPY COMPLETE. 
/copvcr,mods 
M0D2 

•IDENT M0D2 
•DECK DECK2 

*D,MOD1.3 W, 

•RESTORE ,7 

COPY COMPLETE . 
/copyer,mods 
M0D3 

•IDENT MOD3 
•DECK DECK2 

*RESTORE,M0D1.3 

COPY COMPLETE, 
/copycr, roods 

END OF INFORMATION ENCOUNTERED. 



Results of the PULLALL directive 



■ These numbers indicate the location 
of a directive affecting a modset. 
They are the next sequence number 

■ in the deck from which the directive 
was copied (refer to figure 4-1). 



Results of- the PULLMOD 
directive . 



Figure C-l. OPLEDIT Examples (Sheet 2 of 2) 
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INDEX 



A option 8- 
Activate bit 
Active line 
Activity bit 



1 
9-3 
9-2 
9-2 



Alternate directives file 1-2; 5-1 
Alternate OPL file 3 -2 
ASCII-mode considerations 1-4 



Backspace file 5-1 
Batch job examples 10-1 
BKSP directive 5-2 



C option 8-1 

Call common deck 6-1 

CALL directive 6-1 

Call related common decks 6-2 

CALLALL directive 6-2 

CB option 8-1 

CG option 8-1 

Change prefix character 7-1; 10-5 

Character sets 9-4; A-l 

Character set conversion 8-1 

CL option 8-1 

COMMENT directive 6-2 

Comment line 6-2; 7-1 

Common deck 

call 6-1 

declaring 3-1 

identification 9-2 

purpose 1-1 
COMMON line 3-1 
COMPASS binary output 8-1 
COMPASS COMMENT pseudo instruction 
COMPASS get text option 8-1 
COMPASS list option 8-1 
COMPASS system text option 8-1 
COMPILE file 8-1 
Compile file 

compressed format 1-1 

compressed mode 8-1 

contents 9 -4 

directives 6-1 

end-of-file 6-3 

end-of-record 6-3 

line width 3-3; 6-2 

no rewind 8-2 

output 8-1 

sequencing 3-3; 6-3 

write phase 1-3 
Compressed compile file 8-1 
Compressed lines 1-1; 9-3, 4 
Conditional call common deck 6-1 
Conditional range 6-2 
Control statement 8-1 
Control statement input 8-3 
COPY directive 3-3 
Copy program library 3-2 
COPYPL directive 3-2 
CREATE directive 3-2 
Create comment line 6-2 
Creation date 9-2 
Creation of program library 3-2; 10-1 



6-2 



CS option 8-1 
CV option 8-1 
CWEOR directive 6-3 



D directive 4-2 
D option 8-1 
Deactivate line 4-2 
Dubug option 8-1 
Deck 

common 1-1; 3-1; 6-1 

edit 4-3 

identification 4-2 

ignore 4-3 

move 7-2 

purge 4-3 

records 9-2 

remove 4-3 

replace 3-2 
DECK directive 4-2 
Deck name 

duplicate 3-1 

identify 

location 



3- 
4-2 
3-1 

purpose 3-1 
Deck status B-l 
Declare OPL files 3-2 
DEFINE directive 7-1 
Define IF name 7-1 
Define IF value 7-1 
Define IFCALL name 7-1 
Define NIFCALL name 7-1 
DELETE directive 4-2 
Delete lines 4-2 
Directive 

format 2-1 

input 8-2 

prefix character 2-1; 7- 

separator 2-1 
Directives 

alternate file 5-1 

compile file 6-1 

file 9-4 

file manipulation 5-1 

initialization 3-1 

Modify input 8-2 

modification 4-1 

on program library 5-1 

special 7-1 
Directory 

library 1-2; 9-3 

record 9-3 

table 9-3 



Edit deck 

full edit 4-3 
OPLEDIT C-l 
selective edit 4-3 
UPDATE edit 4-3 
EDIT directive 4-3 
EDIT (OPLEDIT) directive 
ELSE directive 6-2 
End conditional range 6-2 
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End-of-file 6-3 

End-of-record 6-3 

End-of -record, conditional 6-3 

ENDIF directive 6-2 

Error messages B-2 

EVICT of NPL 8-2 

Execute COMPASS 8-2 

Execute program 8-2 

Execution of Modify 1-3 



F option 4-4; 8-1 

Features of Modify 1-3 

File formats 9-1 

File manipulation directives 5-1 

File positioning 5-2 

File, return 5-2 

File, rewind 5-2 

Files 

compile 8-1; 9-4 

COMPILE 8-1 

directives 1-1; 8-2 

list output 8-2 

NPL 8-2 

OPL 8-2; 9-1 

program library 1-1; 8-2; 9-1 

reserved 5-1 

scratch 5-1; 9-4 

source 3-1; 8-2; 9-1 

SOURCE 8-2 

used to initialize program library 
Format of directive 2-1 
Full edit mode 4-4; 8-1 



1-1 



Messages, error B-2 
Modification date 9-2 
Modification directives 4-1 
Modification history byte 9-3 
Modification name 4-1 
Modification table 9-2 
Modification set 

deactivate 4-3 

generate C-l 

identifier 1-3; 4-1 

name 1-3; 4-1 

reconstruct C-l 

remove C-l 
Modify 

batch examples 10-1 

batch processing example 1-4 

comments 7-1 

control statement 8-1 

error messages B-2 

examples, general description 1-3, 4 

execution 1-3 

file formats 9-1 

general description 1-1 

listing B-l 

organization 1-1, 2 

output files 1-2 

time -sharing processing example 1-4 
Modify program library example 10-2 
MODNAME directive 4-2 
Move decks 7-2 
MOVE directive 7-2 
Move text 10-3 



Generate modification set C-l 



History byte 9-3 
History of modifications 



4-2 



9-3 



I directive 

I option 8-2 

IDENT directive 4-1 

Identify modification set 4-1, 2 

IF, define value for 7-1 

IF directive 6-2 

IFCALL directive 6-1 

Ignore deck modifications 4-3 

IGNORE directive 4-3 

Inactive line 9-2 

Initialization directives 3-1 

Initialize program library phase 

Input directives file 1-1; 8-2 

Input oii control statement 8-3 

Input text width 7-1 

INSERT directive 4-2 

Insert lines 4-2 

INWIDTH directive 7-1 



L option 8-2 

Line deactivation 4-2 

Line identification 2-1; 4- 

Line insertion 4-2 

Line reactivation 4-2 

Line width 3-3; 6-2 

List comment 7-1 

List options 8-2 

List output file 8-2; B-l 

LO options 8-2 



1-3 



N option 8-2 
Name 

deck 3-1; 4-2 

default 3-1; 4-2 

define 7-1 

modification 4-1 
New program library file 8-2 
NIFCALL directive 6-1 
No rewind of compile file 8-2 
No sequence flag 3-3; 6-3 
No sequence information 3-3; 6-3 
NOSEQ directive 3-3; 6-3 
NPL file 8-2 
NR option 8-2 

Old program library file 8-2; 9-1 
OPL file 8-2; 9-1 
OPLEDIT control statement C-2 
OPLEDIT error messages B-2 
OPLEDIT utility C-l 
OPLFILE directive 3-2 
Organization 1-1, 2 
OUTPUT file 8-2 

P option 8-2 
PREFIX directive 7-1 
Prefix character 2-1; 7-1; 10-5 
Prefix table 9-2, 3 
PREFDCC directive 7-1 
Preparing source file 3-1 
Program library 1-1 

containing directives 5-1 

creation 3-2 

file 8-2; 9-1 
PULLALL (OPLEDIT) directive C-l 
PULLMOD (OPLEDIT) directive C-l 
Purge decks 4-3; 10-5 
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PURGE (OPLEDIT) directive C-l 
PURDEGK directive 4-3 



Q option 8-2 



Random address 9-3 

Range, conditional 6-2 

Reactivate lines 4-2 

Read alternate directive file 5-1; 10-4 

READ directive 5-1 

READPL directive 5-1 

Read directives from program library 5-1 

Read modification directives phase 1-3 

Reconstruct modification set C-l 

Record type 9-3 

Remove deck 4-3 

Remove modification set C-l 

Reorder decks 7-2 

Replace decks 3-2 

Reposition file 5-2 

Rescind YANK directive 4-3 

Reserved file names 5-1 

RESTORE directive 4-2 

RETURN directive 5-2 

Return file 5-2 

Reverse conditional range 6-2 

REWIND directive 5-2 

Rewind file 5-2 



S option 8-2 

Sample FORTRAN program 10-8 
Scratch files 5-1; 9-4 
Selective edit mode 4-4 
Separators for directives 2-1 
SEQ directive 6-3 
Sequence file 6-3; 7-2 
Sequence number 9-4 
Sequencing 

disable 3-3; 6-3 

enable 6-3 

flag 3-3; 6-3 

SEQ directive 6-3 

update 7-2 
SKIP directive 5-2 
Skip forward on file 5-2 
Skip records 5-2 
SKIPR directive 5-2 
SOURCE file 8-2 



Source file 

compile file directives on 1-2 
generated by Modify 8-2; 9-1 
preparation- 3-1; 9-1 
Special directives 7-1 
Standard character set A-l 
Statistics B-l 
Status of deck B-l 
Systems text selection 8-1 



Terminate conditional range 6-2 
Test for conditional range 6-2 
Text format 9-2 

Time-sharing considerations 1-3, 4 
Type of record 9-3 



U option 4-4; 8-2 

UNYANK directive 4-3 

Unyank modification set 4-3; 10-4 

UPDATE directive 7-2 

Update edit mode 4-4; 8-2 

Update library 7-2 



Value, define for IF 7-1 



WEOF directive 6-3 

WEOR directive 6-3 

WIDTH directive 3-3; 6-2 

Width of line 3-3; 6-2 

Write end-of-file 6-3 

Write end -of- record 6-3 

Write end-of-record, conditionally 

Write output files phase 1-3 



6-3 



X option 8-2 



YANK directive 4-3 

Yank modification set 4-3; 10-4 



Z option 8-3; 10-7 



/ (insert comment) 7-1 
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Manual Title CDC NOS Modify Reference Manual 



Pub. No. 60450100 



Rev. D 



As part of Control Data s continuing quality improvement program, we invite you to complete this questionnaire so 
that you may have a more direct influence on the manuals you use. 

Please rate this manual for each general and individual category on a scale of 1 through 5 as follows: 

1 - Excellent 2 - Good 3 - Fair 4 - Poor 5 - Unacceptable 



I. Writing Quality 

A. Technical accuracy 

B. Completeness 

C. Audience defined properly 

D. Readability 

E. Understandability 

F. Organization 

II. Examples 
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A. 
B. 
C. 
D. 
E. 



Quantity 

Placement 

Applicability 

Quality 

Instructiveness 



III. Format 

A. Type size 

B. Page density 

C. Art work 

D. Legibility 

E. Printing/Reproduction 

IV. Miscellaneous 



A. 
B. 



Index 
Glossary 



VI. 



D. I am interested primarily in 
user guides designed to teach 
the user about a product or 
certain capabilities of a product. 

We recognize that we have a wide 
variety of users. Please identify your 
primary area of interest or activity: 



A. 


Stud< 


snt 


B. 


Applications programmer 


C. 


Systems programmer 


D. 


How 


many years programming 




expe 


Mence do you have? 


E. . 


What 


languages 




1. 


Algol 




2. 


Basic 




3. 


Cobol 




4. 


Compass 




5. 


Fortran 




6. 


PL/I 




7. 


Other 



F. 



Have you ever worked on 
non-CDC equipment? 



1. 



Please provide a yes or no answer 
regarding manuals in general: 

A. I prefer that a manual on a software 
product be as comprehensive as 
possible; physical size is of little 
importance. 

B. I prefer that information on a 
software product be covered in 
several small manuals, each 
covering a certain aspect of the 
product. Smaller manuals with 
limited subject matter are easier 
to work with. 

C. I am interested primarily in 
reference manuals designed for 
ease of locating specific 
information. 



General Comments 



If yes, approximately 
what percent of your 
experience is on non- 
CDC equipment? 



How do you rate CDC 

manuals against other 

similar manuals using 

the 1-5 ratings. 

(Example: XYZ Corp. 2 

means XYZ manuals are good 

as compared to CDC manuals.) 

Burroughs 

DEC _ 

Hewlett-Packard 

Honeywell 

IBM _ 

NCR _ 

Univac 

Other 
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MODIFY CONTROL STATEMENT PARAMETERS 

MODIFY(p r P 2 p n ) 

A Presence of A causes compressed compile file. 

C Compile file output; COMPILE if C or omitted. No compile file if C=0. Otherwise, output 

on file named (C=lfn). 

CB COMPASS binary output file; used with Q and X options only. Output on LGO if CB. No 

binary if CB=0. Otherwise, output on file named (CB=lfn). 

CG COMPASS get text option; used with Q and X options only. Systems text on SYSTEXT if CG. 

No systems text if CG=0. Defined by CS option if CG is omitted. Otherwise, systems text on 
file named (CG=lfn). 

CL COMPASS list output; used with Q and X options only. Short list if CL=0 or omitted. Output 

on file OUTPUT if CL. Otherwise, list output on file named (CL=lfn). 

CS COMPASS systems text; used with Q and X options only. Systems text on SYSTEXT overlay 

if omitted or CS. No systems text if CS=0; otherwise, systems text on file named (CS=lfn). 

CV Program library character set conversion. None if CV is omitted; 63 to 64 if CV=64; 64 to 

63 if CV=63. 

D Debug option. Directive error or fatal error causes job abort if D is omitted. No job abort 

for directive errors if D is used. 

F Full edit. If omitted, deck editing determined by U option or by EDIT directives. If F is 

specified, all decks are edited and written on compile file, new program library, and source 
file. 

I Directives input. If omitted, directives and corrections on INPUT. If 1=0 there is no input 

file. Otherwise, on named file (I=lfn). 

L List output. Omitted or L, listings on OUTPUT. L=lfn, output to named file. 

LO List options. Omitted or LO, options E, C, T, M, W, D, and S are selected. Otherwise, 

LO=c, , C2- . . c n to a maximum of seven options (AECDIMST or W). 

N New program library. Omitted or N=0, no new library. N, output on NPL. N=lfn, output 

to named file. 

NR No rewind on compile file. Omitted, compile file rewound before and after MODIFY run. 

P Program library input. Omitted or P, library on OPL. P=lfn, library on named file. P=0, 

no program library input file. 

Q Execute assembler or compiler; no rewind of directives file or list output file. Omitted or Q = 0, 

assembler or compiler not automatically called. Q, Modify sets A parameter and LO = E and calls 
COMPASS. This option enables CB, CG, CL, and CS options. If Q=lfn, Modify calls assembler 
on lfn. 

S Source output (illegal if A, Q, or X selected). Omitted or S=0, no source output. S, output 

on SOURCE. S=lfn, output on named file. 

U Update edit. Omitted, editing set by F or by EDIT directives. F takes precedence over U. 

if U, only decks changed (named on DECK directives) are edited and written on compile file, 
new program library, and source file. 

X Execute assembler or compiler; same as Q except directives file and list output file are rewound. 

Z Directives on Modify. card. Omitted, directives are next record on INPUT or identified by 

one option. Z, directives follow parameters on Modify. A separator bar separates two 
directives. 
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